summaryrefslogtreecommitdiff
path: root/gnosis.el
diff options
context:
space:
mode:
authorThanos Apollo <[email protected]>2023-12-29 04:57:51 +0200
committerThanos Apollo <[email protected]>2023-12-29 04:57:51 +0200
commite33f25e15e48f7872499018d73c5224a004c8eb9 (patch)
tree3a7d8d0f35751e348a9e8c309851598fd55f6737 /gnosis.el
parent47dd5f1613d5be4a53277961550dd8634f5f587e (diff)
Add gnosis-review-cloze-reveal-unanswered
This is just a rewritten version of the previous gnosi-review-cloze-reveal. Loop for clozes, and 'reveal them' with gnosis-face-cloze-unanswered
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."