From 3de3c4626309198ae0fb869bd27b47e8a7f3ef8d Mon Sep 17 00:00:00 2001 From: Thanos Apollo Date: Sun, 11 Aug 2024 17:18:56 +0300 Subject: Add function: review-note-overdue-p * Return t if note with ID is overdue. --- gnosis.el | 9 +++++++++ 1 file changed, 9 insertions(+) (limited to 'gnosis.el') diff --git a/gnosis.el b/gnosis.el index 56b3965..9708fdb 100644 --- a/gnosis.el +++ b/gnosis.el @@ -1423,6 +1423,15 @@ QUERY: String value," ;; Review ;;;;;;;;;; + +(defun gnosis-review-note-overdue-p (id) + "Return t if note with ID is overdue. + +This function is meant to be used with today's due notes, using +`gnosis-review-get-due-notes'." + (let ((due-date (gnosis-get 'next-rev 'review-log `(= id ,id)))) + (not (equal due-date (gnosis-algorithm-date))))) + (defun gnosis-review-is-due-p (note-id) "Check if note with value of NOTE-ID for id is due for review. -- cgit v1.2.3