summaryrefslogtreecommitdiff
path: root/gnosis.el
diff options
context:
space:
mode:
Diffstat (limited to 'gnosis.el')
-rw-r--r--gnosis.el7
1 files changed, 4 insertions, 3 deletions
diff --git a/gnosis.el b/gnosis.el
index c4bae47..d99ae27 100644
--- a/gnosis.el
+++ b/gnosis.el
@@ -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)