diff options
-rw-r--r-- | app/app.lisp | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/app/app.lisp b/app/app.lisp index 93181a8..c9372c8 100644 --- a/app/app.lisp +++ b/app/app.lisp @@ -275,7 +275,7 @@ than the users." (ecase (a:make-keyword (string-upcase command)) (:help (princ #\newline) - (help-topic (first args))) + (help-topic (or (first args) "help"))) (:search (cond ;; if there are args, use them as search terms |