diff options
author | Thanos Apollo <[email protected]> | 2024-01-26 09:52:33 +0200 |
---|---|---|
committer | Thanos Apollo <[email protected]> | 2024-01-26 09:52:33 +0200 |
commit | 2b1e1b80ac6257bda53de5992aca0f3854b3d246 (patch) | |
tree | 0c6c0c8bd5d005142d9719210f2d670118be217c | |
parent | d3ef83c53f0429df62e7f1d4ce8d2fd814c0de74 (diff) |
Fix gnosis-get-deck-due-notes
Returns list of due notes for deck.
-rw-r--r-- | gnosis.el | 7 |
1 files changed, 4 insertions, 3 deletions
@@ -766,9 +766,10 @@ Optionally, add cusotm PROMPT." if DUE is t, return only due notes" (let* ((deck (or deck-id (gnosis--get-deck-id))) - (notes (gnosis-select 'id 'notes `(= deck-id ,deck)))) - (cl-loop for note in (apply #'append notes) - when (not (gnosis-suspended-p note)) + (notes (gnosis-select 'id 'notes `(= deck-id ,deck) t))) + (cl-loop for note in notes + when (and (not (gnosis-suspended-p note)) + (gnosis-review-is-due-p note)) collect note))) (defun gnosis-past-or-present-p (date) |