From 8ed7abf7435e412fb355c880da845a7bc203d20f Mon Sep 17 00:00:00 2001 From: Colin Okay Date: Mon, 28 Feb 2022 12:04:08 -0600 Subject: changing language on prompt for tags --- src/lib.lisp | 8 +++++--- 1 file changed, 5 insertions(+), 3 deletions(-) diff --git a/src/lib.lisp b/src/lib.lisp index b49f8c2..f5f55b4 100644 --- a/src/lib.lisp +++ b/src/lib.lisp @@ -271,9 +271,11 @@ the directories that appear in the value of that variable." :expect 'valid-brief-description-p :retry-text "Too long. Must be <= 72 characters: ")) (tags - (append init-tags - (ppcre:split " +" - (prompt (format nil "Tags in addition to ~{~a ~} ?" init-tags))))) + (progn + (format t "Tags include: ~{~a ~}~%" init-tags) + (append init-tags + (ppcre:split " +" + (prompt "More tags here, or Enter to skip: "))))) (runstyle (string-upcase (prompt "Runstyle (auto or manual): " -- cgit v1.2.3