zone.lisp: Use `*default-zone-ttl*' as the default zone TTL.

[zone] / zone.lisp

diff --git a/zone.lisp b/zone.lisp
index 96cddfb..f7717ff 100644 (file)
--- a/zone.lisp
+++ b/zone.lisp
@@ -552,7 +552,7 @@
        (retry *default-zone-retry*)
        (expire *default-zone-expire*)
        (min-ttl *default-zone-min-ttl*)
-       (ttl min-ttl)
+       (ttl *default-zone-ttl*)
        (serial (make-zone-serial raw-zname))
        &aux
        (zname (zone-parse-host raw-zname root-domain)))