frontend.lisp: Return a non-nil result for `cl-launch''s benefit.

diff --git a/frontend.lisp b/frontend.lisp
index 661b80a..1c1a442 100644 (file)
--- a/frontend.lisp
+++ b/frontend.lisp
@@ -165,7 +165,8 @@
                 (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 ()