;;;; 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 ""))