diff options
| author | Colin Okay <colin@cicadas.surf> | 2022-08-06 09:09:42 -0500 |
|---|---|---|
| committer | Colin Okay <colin@cicadas.surf> | 2022-08-06 09:09:42 -0500 |
| commit | b46a00f1856947d66c8f74b9f24f7574133a1663 (patch) | |
| tree | ee1bdf510b7bbeae9270702f7fd75f2d093b8782 /app/app.lisp | |
| parent | 575695b5f1f204aa670b996e791822f36f47ee1d (diff) | |
[fix] saving local state after command finishes
Diffstat (limited to 'app/app.lisp')
| -rw-r--r-- | app/app.lisp | 8 |
1 files changed, 3 insertions, 5 deletions
diff --git a/app/app.lisp b/app/app.lisp index dff5dcb..2a04c1d 100644 --- a/app/app.lisp +++ b/app/app.lisp @@ -38,7 +38,7 @@ (defun toplevel/handler (cmd) "Prints usage statement and then exits" - (cli:print-usage-and-exit cmd *standard-output*)) + (cli:print-usage cmd *standard-output*)) (defun toplevel/command () "Returns the toplevel command object." @@ -54,8 +54,6 @@ (defun main () (ol::with-local-state - (handler-case - (cli:run (toplevel/command))) - (error (e) - (format t "unhandled error ~e~%" e)))) + (cli:run (toplevel/command)) + (format t "moooooo~%"))) |