diff options
author | Thanos Apollo <[email protected]> | 2024-01-15 22:01:24 +0200 |
---|---|---|
committer | Thanos Apollo <[email protected]> | 2024-01-15 22:02:37 +0200 |
commit | 406ad1e612201e7ba828188f5257617940626ee3 (patch) | |
tree | 8532f8e8d9c0e652bd3408d6b4314a140d203354 /gnosis.el | |
parent | 44c536d5ad6c297733f6c4c467f781235dc20835 (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.el | 5 |
1 files changed, 3 insertions, 2 deletions
@@ -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)) |