aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--build-app.lisp10
-rw-r--r--src/lib.lisp1
2 files changed, 6 insertions, 5 deletions
diff --git a/build-app.lisp b/build-app.lisp
index a3ef6fc..044ae8a 100644
--- a/build-app.lisp
+++ b/build-app.lisp
@@ -91,8 +91,8 @@ you run the oneliner, all positional variables appear first.
:description "Like --run, but puts the oneliner into the clipboard."))
(text :contents " ")
(group (:header "OTHER OPTIONS")
- (flag :long-name "info"
- :description "View all info the oneliner given by NAME or ID")
+ (flag :long-name "view"
+ :description "View all information for the oneliner given by NAME or ID")
(lispobj :long-name "timeout"
:argument-type :optional
:argument-name "SECONDS"
@@ -230,14 +230,14 @@ than the users."
(cli::unlock-item id-or-name ))
((getopt :long-name "edit")
(cli::edit-item id-or-name ))
- ((getopt :long-name "info")
+ ((getopt :long-name "view")
(cli::print-item-explanation id-or-name))
((getopt :long-name "clip")
- (cli::run-item id-or-name (rest arguments)
+ (cli::run-item id-or-name args
:force-clip t
:timeout (getopt :long-name "timeout")))
((getopt :long-name "run")
- (cli::run-item id-or-name (rest arguments)
+ (cli::run-item id-or-name args
:timeout (getopt :long-name "timeout")))
(t
(cli::search-for-oneliners arguments
diff --git a/src/lib.lisp b/src/lib.lisp
index 2ade79b..b3741cd 100644
--- a/src/lib.lisp
+++ b/src/lib.lisp
@@ -175,6 +175,7 @@ and, failing that, try to fetch from configured server."
(defun print-item-explanation (name-or-number)
(with-oneliner (ol name-or-number)
+ (set-term-width)
(print-oneliner-result-for-user ol)
(when (getf ol :explanation)
(princ #\newline)