diff options
Diffstat (limited to 'l/src/main.lisp')
-rw-r--r-- | l/src/main.lisp | 7 |
1 files changed, 1 insertions, 6 deletions
diff --git a/l/src/main.lisp b/l/src/main.lisp index 22c1d07..770d88b 100644 --- a/l/src/main.lisp +++ b/l/src/main.lisp @@ -25,12 +25,7 @@ :long "version")) (defun main () - (handler-bind ((error - #'(lambda (e) - ;; TODO: generic function for this and `handle-option-error` - (format *error-output* "error: ~a~%" e) - - (opts:exit 69)))) + (handler-bind ((error #'(lambda (e) (exit-with-error e 69)))) (let ((config (parse-options))) ;; Store the WebSocket client as a global. |