summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorThanos Apollo <[email protected]>2024-01-15 09:49:39 +0200
committerThanos Apollo <[email protected]>2024-01-15 09:53:09 +0200
commitbafe2bf8d25d39f8c6dd49da3898bdf998a7854f (patch)
treede4c1517d02af13e27cda2ad8aa5a57062a04bd1
parent8ca53e1a0e7f1cde295b2aab29893439be07a89a (diff)
[fix] gnosis-review-y-or-n
- Remove previous unused user-input keyword - Fix name typo
-rw-r--r--gnosis.el6
1 files changed, 3 insertions, 3 deletions
diff --git a/gnosis.el b/gnosis.el
index f58e851..4b28e95 100644
--- a/gnosis.el
+++ b/gnosis.el
@@ -933,7 +933,7 @@ SUCCESS is a binary value, 1 is for successful review."
(gnosis-review--update id (if success 1 0))
(gnosis-display--next-review id)))
-(defun gnosis-review-y-or-p (id)
+(defun gnosis-review-y-or-n (id)
"Review y-or-n type note for ID."
(gnosis-display--image id)
(gnosis-display--question id)
@@ -941,7 +941,7 @@ SUCCESS is a binary value, 1 is for successful review."
(let* ((answer (gnosis-get 'answer 'notes `(= id ,id)))
(user-input (read-char-choice "[y]es or [n]o: " '(?y ?n)))
(success (equal answer user-input)))
- (gnosis-display-y-or-n-answer :answer answer :success success :user-input user-input)
+ (gnosis-display-y-or-n-answer :answer answer :success success)
(gnosis-display--extra id)
(gnosis-review--update id (if success 1 0))
(gnosis-display--next-review id)))
@@ -999,7 +999,7 @@ Used to reveal all clozes left with `gnosis-face-cloze-unanswered' face."
("mcq" (gnosis-review-mcq id))
("basic" (gnosis-review-basic id))
("cloze" (gnosis-review-cloze id))
- ("y-or-n" (gnosis-review-y-or-p id))
+ ("y-or-n" (gnosis-review-y-or-n id))
(_ (error "Malformed note type")))))))
(defun gnosis-review-commit (note-num)