summaryrefslogtreecommitdiff
path: root/gnosis.el
diff options
context:
space:
mode:
authorThanos Apollo <[email protected]>2024-01-15 22:01:24 +0200
committerThanos Apollo <[email protected]>2024-01-15 22:02:37 +0200
commit406ad1e612201e7ba828188f5257617940626ee3 (patch)
tree8532f8e8d9c0e652bd3408d6b4314a140d203354 /gnosis.el
parent44c536d5ad6c297733f6c4c467f781235dc20835 (diff)
[fix] Fix bug from 5fefd3d for multiple cloze review
- Update note after all clozes have been revealed and add comment as reminder
Diffstat (limited to 'gnosis.el')
-rw-r--r--gnosis.el5
1 files changed, 3 insertions, 2 deletions
diff --git a/gnosis.el b/gnosis.el
index a1199e2..a3f9ca0 100644
--- a/gnosis.el
+++ b/gnosis.el
@@ -975,7 +975,6 @@ Used to reveal all clozes left with `gnosis-face-cloze-unanswered' face."
(if (equal (car input) t)
;; Reveal only one cloze
(progn (gnosis-display-cloze-reveal :replace cloze)
- (gnosis-review--update id 1)
(setf num (1+ num)))
;; Reveal cloze for wrong input, with `gnosis-face-false'
(gnosis-display-cloze-reveal :replace cloze :success nil)
@@ -985,7 +984,9 @@ Used to reveal all clozes left with `gnosis-face-cloze-unanswered' face."
(when (< num clozes-num) (gnosis-review-cloze-reveal-unaswered clozes))
(gnosis-display-cloze-user-answer (cdr input))
(gnosis-review--update id 0)
- (cl-return)))))
+ (cl-return)))
+ ;; Update note after all clozes are revealed successfully
+ finally (gnosis-review--update id 1)))
(gnosis-display--extra id)
(gnosis-display--next-review id))