;;;; show.lisp

(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)))

(defun show/command ()
  (cli:make-command
   :name "show"
   :usage "<IDENTIFIER>"
   :description "show detailed information about a oneliner"
   :handelr #'show/handler ))