diff options
| author | Colin Okay <okay@toyful.space> | 2022-03-14 08:15:27 -0500 |
|---|---|---|
| committer | Colin Okay <okay@toyful.space> | 2022-03-14 08:15:27 -0500 |
| commit | 86f7cdb2ce0f99aee0328617999f35b63694b4a6 (patch) | |
| tree | bbb87135612b2f0d08874d0bc8c5e6dbef3f8f11 /app/app.lisp | |
| parent | f18dddd766af9e06ba4f66487701322de495de59 (diff) | |
argument checking for run and clip
Diffstat (limited to 'app/app.lisp')
| -rw-r--r-- | app/app.lisp | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/app/app.lisp b/app/app.lisp index 69cc42c..3277521 100644 --- a/app/app.lisp +++ b/app/app.lisp @@ -280,10 +280,12 @@ than the users." (uiop:quit)))) (:run + (help-and-quit-unless "run" id-or-name) (cli:run-item id-or-name (rest args) :timeout (getopt :long-name "timeout") :draftp (getopt :long-name "draft"))) (:clip + (help-and-quit-unless "clip" id-or-name) (cli:run-item id-or-name (rest args) :force-clip t :draftp (getopt :long-name "draft"))) |