Commit 0c97e5de authored by Francois-Rene Rideau's avatar Francois-Rene Rideau
Browse files

Have the release script return success.

parent 6b661661
......@@ -106,4 +106,5 @@ NB: this script requires ASDF or later, for argv0.
(if (eq status :external)
(format t "~@[~{~S~^ ~}~%~]" (multiple-value-list (apply command (rest argv))))
(die 2 "~A ~:[requires a command~;doesn't recognize command ~:*~A~].~%Try one of: ~(~{~A~^ ~}~)~%"
(argv0) (first argv) (valid-commands)))))
(argv0) (first argv) (valid-commands))))
t) ;; success according to uiop:restore-image.
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment