--- a/lisp/json-string.lisp Mon Nov 11 20:45:45 2019 -0500
+++ b/lisp/json-string.lisp Mon Nov 11 20:46:32 2019 -0500
@@ -37,21 +37,6 @@
("Turn 3 files into one big string:" . "cat foo bar baz | json-string")))
-(defparameter *option-debug*
- (adopt:make-option 'debug
- :help "Enable the lisp debugger."
- :long "debug"
- :short #\d
- :reduce (constantly t)))
-
-(defparameter *option-no-debug*
- (adopt:make-option 'no-debug
- :result-key 'debug
- :help "Disable the lisp debugger (the default)."
- :long "no-debug"
- :short #\D
- :reduce (constantly nil)))
-
(defparameter *option-help*
(adopt:make-option 'help
:help "Display help and exit."