From: Mark Wooding <mdw@distorted.org.uk>
Date: Tue, 30 Apr 2024 00:39:00 +0000 (+0100)
Subject: frontend.lisp: Return a non-nil result for `cl-launch''s benefit.
X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~mdw/git/zone/commitdiff_plain/76ffa76c1bafa87edf2de90b1432fe3f4cb1d651

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

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