From e18e4e43d0467b2341c2176dcdb467f12d4358c7 Mon Sep 17 00:00:00 2001 From: Colin Okay Date: Tue, 22 Feb 2022 11:24:57 -0600 Subject: running oneliners --- build-app.lisp | 6 ++---- 1 file changed, 2 insertions(+), 4 deletions(-) (limited to 'build-app.lisp') diff --git a/build-app.lisp b/build-app.lisp index c95d163..8be3639 100644 --- a/build-app.lisp +++ b/build-app.lisp @@ -135,8 +135,7 @@ than the users." ((getopt :long-name "unlock") (cli::unlock-item hist-number)) (t - (format t "TBD: Going to run command ~a with arguments ~a~%" - hist-number (rest arguments)))) + (cli::run-item hist-number (rest arguments)))) (uiop:quit)) ;; otherwise search for oneliners (cli::search-for-oneliners arguments @@ -146,8 +145,7 @@ than the users." (help))) (uiop:quit)) (error (e) - (format *error-output* "ERROR: ~a~%" e) - (help) + (format *error-output* "~%ERROR: ~a~%" e) (uiop:quit)))) ;;; DUMP EXECUTABLE -- cgit v1.2.3