diff options
-rw-r--r-- | l/src/main.lisp | 9 |
1 files changed, 8 insertions, 1 deletions
diff --git a/l/src/main.lisp b/l/src/main.lisp index 5ea0384..99a60d0 100644 --- a/l/src/main.lisp +++ b/l/src/main.lisp @@ -8,6 +8,7 @@ (:name :socket-url :description "DevTools protocol WebSocket URL" :long "socket-url" + :arg-parser #'identity :meta-var "SOCKET_URL") (:name :help :description "print this help menu" @@ -20,7 +21,13 @@ (defun main () (multiple-value-bind (options free-args) (opts:get-opts) - ; (when-option (options :help)) + (when-option (options :help) + (opts:describe + :usage-of "extreload" + :args "EXTENSION_ID...") + + (opts:exit 64)) + (when-option (options :version) (format t "~a~%" (asdf:component-version (asdf:find-system :extreload))) |