From 1e1e7cbb7cf0d558421624c5d8ff5fbffa7e2aff Mon Sep 17 00:00:00 2001 From: Thanos Apollo Date: Mon, 18 Dec 2023 02:54:53 +0200 Subject: Add gnosis-review--get-due-notes --- gnosis.el | 4 ++++ 1 file changed, 4 insertions(+) diff --git a/gnosis.el b/gnosis.el index 77bbae3..943eff5 100644 --- a/gnosis.el +++ b/gnosis.el @@ -155,6 +155,10 @@ TAGS are used to organize questions." (history-add-new-input nil)) ;; Disable history (completing-read "Answer: " choices))) +(defun gnosis-review--get-due-notes () + "Get due notes for current date." + (gnosis--select 'id 'review-log `(<= next-rev ',(gnosis-algorithm-date)))) + (defun gnosis-review-mcq-choices (id) "Display multiple choice answers for question ID." (let ((answer (gnosis-get 'answer 'notes `(= id ,id))) -- cgit v1.2.3