aboutsummaryrefslogtreecommitdiff
path: root/app
diff options
context:
space:
mode:
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