diff options
author | Thanos Apollo <[email protected]> | 2023-12-27 10:02:18 +0200 |
---|---|---|
committer | Thanos Apollo <[email protected]> | 2023-12-27 10:02:18 +0200 |
commit | e1e7781c8d0ba419e9b9b3553957fbf05f9d0421 (patch) | |
tree | 9944836a5b10ef47e756f6ddd1f7b3afe5a5382a | |
parent | 200e4f4a10eff98b24d24dcdc69446627bf0f3e1 (diff) |
Add while loop for adding notes
-rw-r--r-- | gnosis.el | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -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.")))) |