net.lisp (ipmask-cidr-slash): Rename from `ipmask-cidl-slash'.
[zone] / frontend.lisp
index 661b80a..1c1a442 100644 (file)
                 (progv *zone-config* (mapcar #'symbol-value *zone-config*)
                   (load f :verbose nil :print nil :if-does-not-exist :error)
                   (delete-package *package*))))
-            (zone-save opt-zones :format opt-format)))
+            (zone-save opt-zones :format opt-format)
+            t))
       (with-unix-error-reporting ()
        (unless (option-parse-try
                  (do-options ()