diff options
| author | Colin Okay <okay@toyful.space> | 2022-02-28 12:04:08 -0600 |
|---|---|---|
| committer | Colin Okay <okay@toyful.space> | 2022-02-28 12:04:08 -0600 |
| commit | 8ed7abf7435e412fb355c880da845a7bc203d20f (patch) | |
| tree | 5426d7cec77a9cad493d17b1f3b7e3609ae8c9db /src | |
| parent | a5e71e29b90178572951384240e5dafa91d15943 (diff) | |
changing language on prompt for tags
Diffstat (limited to 'src')
| -rw-r--r-- | src/lib.lisp | 8 |
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): " |