syndicate-lang
/
racket-dns-2012
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Fix stupid zone expiry bug: timers are to be relative!

This commit is contained in:
Tony Garnock-Jones 2012-02-19 12:37:55 -05:00
parent e8c13053f1
commit 1d9e06eee5
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
zonedb.rkt
View File

@ -120,7 +120,7 @@
(lambda (expirymap) (lambda (expirymap)
(values new-zone (values new-zone
(set-union (list->set (set-union (list->set
(map (lambda (e) (cons name e)) (map (lambda (e) (cons name (- e now-seconds)))
(filter (lambda (e) (not (infinite-lifetime? e))) (filter (lambda (e) (not (infinite-lifetime? e)))
(hash-values expirymap)))) (hash-values expirymap))))
timers)))] timers)))]