diff options
| -rw-r--r-- | l/src/option.lisp | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/l/src/option.lisp b/l/src/option.lisp index a294325..22e6052 100644 --- a/l/src/option.lisp +++ b/l/src/option.lisp @@ -32,7 +32,10 @@ (opts:exit 0)) - ; (if ) ;; If no socket URL, error 64 + (when (null (getf options :socket-url)) + (format *error-output* "error: '--socket-url' is required~%") + + (opts:exit 64)) (make-instance 'config :socket-url (getf options :socket-url) |