From 5fdb4c06911fa73ce2b1c864f6c37b841bfdd65b Mon Sep 17 00:00:00 2001 From: Teddy Wing Date: Sat, 27 Feb 2021 17:59:41 +0100 Subject: main: Move command line option definitions to `option.lisp` Makes more sense to group the option code together. --- l/src/main.lisp | 21 --------------------- 1 file changed, 21 deletions(-) (limited to 'l/src/main.lisp') diff --git a/l/src/main.lisp b/l/src/main.lisp index 61a48be..5dee032 100644 --- a/l/src/main.lisp +++ b/l/src/main.lisp @@ -9,27 +9,6 @@ (defconstant +timeout-seconds+ 5) -(opts:define-opts - (:name :socket-url - :description "DevTools protocol WebSocket URL" - :long "socket-url" - :arg-parser #'identity - :meta-var "SOCKET_URL") - (:name :reload-current-tab - :description "pass this to reload the active Chrome tab" - :long "reload-current-tab") - (:name :debug - :description "print debug output" - :long "debug") - (:name :help - :description "print this help menu" - :short #\h - :long "help") - (:name :version - :description "show the program version" - :short #\V - :long "version")) - (defun main () (handler-bind ((error #'(lambda (e) (exit-with-error e sysexits:+unavailable+)))) -- cgit v1.2.3