summaryrefslogtreecommitdiff
path: root/gnosis.el
diff options
context:
space:
mode:
Diffstat (limited to 'gnosis.el')
-rw-r--r--gnosis.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/gnosis.el b/gnosis.el
index 979b592..7bfb9cc 100644
--- a/gnosis.el
+++ b/gnosis.el
@@ -237,8 +237,8 @@ choice in the `CHOICES' list. Each note must correspond to one `DECK'.
"Create note as TYPE."
(interactive (list (completing-read "Type: " '(MCQ Cloze Basic) nil t)))
(pcase type
- ("MCQ" (call-interactively 'gnosis-add-note-mcq))
- ("Cloze" (call-interactively 'gnosis-add-note-cloze))
+ ("MCQ" (while (y-or-n-p "Add MCQ note? ") (call-interactively 'gnosis-add-note-mcq)))
+ ("Cloze" (while (y-or-n-p "Add cloze note? ") (call-interactively 'gnosis-add-note-cloze)))
("Basic" (message "Not ready yet."))
(_ (message "No such type."))))