From 86f7cdb2ce0f99aee0328617999f35b63694b4a6 Mon Sep 17 00:00:00 2001
From: Colin Okay <okay@toyful.space>
Date: Mon, 14 Mar 2022 08:15:27 -0500
Subject: argument checking for run and clip

---
 app/app.lisp | 2 ++
 1 file changed, 2 insertions(+)

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")))
-- 
cgit v1.2.3