aboutsummaryrefslogtreecommitdiff
path: root/app
diff options
context:
space:
mode:
authorColin Okay <okay@toyful.space>2022-03-14 19:36:18 -0500
committerColin Okay <okay@toyful.space>2022-03-14 19:36:18 -0500
commit130ae266f51f63ac423a65b17749a4d38dda1018 (patch)
tree495e848885014b8854f0408f8118daa05ec00bf8 /app
parent67c793633bfcd46997155341dd4b1776fb6a6728 (diff)
Added a --verbose / -v option to RUN
Diffstat (limited to 'app')
-rw-r--r--app/app.lisp4
1 files changed, 4 insertions, 0 deletions
diff --git a/app/app.lisp b/app/app.lisp
index 9b313db..eef9b89 100644
--- a/app/app.lisp
+++ b/app/app.lisp
@@ -136,6 +136,9 @@ Their meaning is as follows:
:default-value 1
:typespec 'integer
:description "How many seconds to wait for standard output before giving up.")
+ (flag :long-name "verbose"
+ :short-name "v"
+ :description "Prints a message indicating the oneliner text that is about to be run prior to execution.")
(flag :long-name "draft"
:description "Indicates that you wish to run a draft of a oneliner identified by IDENTIFIER."))
(group (:header "CLIPPING ONELINERS" :hidden t)
@@ -293,6 +296,7 @@ than the users."
(:run
(help-and-quit-unless "run" id-or-name)
(cli:run-item id-or-name (rest args)
+ :verbose (getopt :long-name "verbose")
:timeout (getopt :long-name "timeout")
:draftp (getopt :long-name "draft")))
(:clip