aboutsummaryrefslogtreecommitdiff
path: root/app/run.lisp
diff options
context:
space:
mode:
authorColin Okay <colin@cicadas.surf>2022-08-04 10:54:39 -0500
committerColin Okay <colin@cicadas.surf>2022-08-04 10:54:39 -0500
commit5c590a614544c977964692e41b0e5c19043b142c (patch)
treea37c12305baa48ccf42f58020d6930b2f1bcfb78 /app/run.lisp
parentd0136dac1e04fac93839e3876f711bfa1837141a (diff)
[wip] working on clingon refactor
Diffstat (limited to 'app/run.lisp')
-rw-r--r--app/run.lisp36
1 files changed, 36 insertions, 0 deletions
diff --git a/app/run.lisp b/app/run.lisp
new file mode 100644
index 0000000..2591927
--- /dev/null
+++ b/app/run.lisp
@@ -0,0 +1,36 @@
+;;;; run.lisp -- run a command
+
+(in-package :oneliners.cli.app)
+
+(defun run/options ()
+ (list
+ (make-option
+ :integer
+ :short-name #\t
+ :long-name "timeout"
+ :key :timeout
+ :initial-value 1
+ :description "Seconds to wait for output before giving up.")
+ (make-option
+ :flag
+ :short-name #\v
+ :long-name "verbose"
+ :key :verbose
+ :description "echoes the oneliner text that is about to be run")
+ (make-option
+ :flag
+ :short-name #\c
+ :long-name "confirm"
+ :key :confirm
+ :description "prompts the user for confirmation before running the command")))
+
+(defun run/handler (cmd))
+
+(defparameter +run/examples+
+ '(()))
+
+
+(defun run/command ()
+ (cli:make-command
+ :name "run"
+ :description ""))