aboutsummaryrefslogtreecommitdiff
path: root/app/show.lisp
diff options
context:
space:
mode:
Diffstat (limited to 'app/show.lisp')
-rw-r--r--app/show.lisp8
1 files changed, 3 insertions, 5 deletions
diff --git a/app/show.lisp b/app/show.lisp
index 1ed3493..2270e67 100644
--- a/app/show.lisp
+++ b/app/show.lisp
@@ -2,11 +2,9 @@
(in-package :oneliners.cli.app)
-(defun show/handler (cmd)
- (a:if-let (ident
- (parse-identifier (first (cli:command-arguments cmd))))
- (ol:print-item-explanation ident)
- (cli:print-usage-and-exit cmd t)))
+(defhandler show/handler (id)
+ (ol:print-item-explanation (parse-identifier id)))
+
(defun show/command ()
(cli:make-command