From 72d11288e24349b875171db6b116a3661f5bdbac Mon Sep 17 00:00:00 2001
From: Colin Okay <okay@toyful.space>
Date: Tue, 22 Feb 2022 08:43:56 -0600
Subject: tweaking oneliner addition functions

---
 src/lib.lisp | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

(limited to 'src/lib.lisp')

diff --git a/src/lib.lisp b/src/lib.lisp
index c6801df..300d6d5 100644
--- a/src/lib.lisp
+++ b/src/lib.lisp
@@ -150,13 +150,13 @@ the directories that appear in the value of that variable."
            (prompt "Brief Description: "))
          (tags
            (append init-tags
-                   (when (y-or-n-p "Add tags in addition to: ~{~a ~}?" init-tags)
-                     (ppcre:split " +" (prompt "(e.g. foo bar goo): ")))))
+                   (ppcre:split " +"
+                                (prompt (format nil "Additional Tags? [~{~a ~}]" init-tags)))))
          (explanation
            (when (y-or-n-p "Provide an explanation?")
              (string-from-editor)))
          (runstyle
-           (if (y-or-n-p "Is GUI, TUI, or requires further input?")
+           (if (y-or-n-p "Does this oneliner invoke a GUI, a TUI, or will it require user input?")
                "MANUAL"
                "AUTO")))
     (api:request-with
-- 
cgit v1.2.3