aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--src/lib.lisp8
1 files 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): "