diff options
-rw-r--r-- | app/app.lisp | 7 | ||||
-rw-r--r-- | oneliners.cli.asd | 2 |
2 files changed, 4 insertions, 5 deletions
diff --git a/app/app.lisp b/app/app.lisp index 28f5465..32f3ad2 100644 --- a/app/app.lisp +++ b/app/app.lisp @@ -203,8 +203,7 @@ than the users." ((getopt :long-name "help") (if (and arguments (find-group-with-header (first arguments))) (help :item (find-group-with-header (first arguments))) - (help)) - (uiop:quit)) + (help))) ((getopt :long-name "whois") (assert (first arguments) () "--whois requires an argument, a user handle.") (cli::show-contributor (first arguments))) @@ -275,5 +274,5 @@ than the users." (getopt :long-name "all-flagged") (getopt :long-name "newest")))))) (t ; no arguments and no options, print help - (help))) - (uiop:quit)))) + (help))))) + (uiop:quit)) diff --git a/oneliners.cli.asd b/oneliners.cli.asd index 8579132..1bc60c8 100644 --- a/oneliners.cli.asd +++ b/oneliners.cli.asd @@ -28,7 +28,7 @@ choice.") (defsystem "oneliners.cli/app" - :version "alpha-0.6.0" + :version "alpha-0.6.1" :author "Colin Okay" :license "AGPLv3" :depends-on ("net.didierverna.clon" |