summaryrefslogtreecommitdiff
path: root/gnosis.el
diff options
context:
space:
mode:
Diffstat (limited to 'gnosis.el')
-rw-r--r--gnosis.el9
1 files changed, 6 insertions, 3 deletions
diff --git a/gnosis.el b/gnosis.el
index e4bc8d2..5cf87df 100644
--- a/gnosis.el
+++ b/gnosis.el
@@ -587,9 +587,12 @@ If user-input is equal to CLOZE, return t."
(let ((user-input (read-string "Answer: ")))
(cons (gnosis-compare-strings user-input cloze) user-input)))
-(defun gnosis-review-cloze--reveal (clozes success)
- "Reveal CLOZES."
- (cl-loop for cloze in clozes do (gnosis-display--cloze-reveal gnosis-cloze-char cloze success)))
+(defun gnosis-review-cloze-reveal-unaswered (clozes)
+ "Reveal CLOZES.
+
+Used to reveal all clozes left with `gnosis-face-cloze-unanswered' face."
+ (cl-loop for cloze in clozes do (gnosis-display-cloze-reveal :replace cloze
+ :face 'gnosis-face-cloze-unanswered)))
(defun gnosis-review-cloze (id)
"Review cloze type note for ID."