summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--gnosis.el5
1 files changed, 5 insertions, 0 deletions
diff --git a/gnosis.el b/gnosis.el
index 3a021fe..1496d1e 100644
--- a/gnosis.el
+++ b/gnosis.el
@@ -1271,6 +1271,11 @@ If DUE, return only due notes."
(if due (gnosis-review-is-due-p id) t))
collect id))
+(defun gnosis-get-tag-notes (tag)
+ "Return note ids for TAG."
+ (let ((notes (gnosis-select 'id 'notes `(like tags ',(format "%%\"%s\"%%" tag)) t)))
+ notes))
+
(defun gnosis-suspended-p (id)
"Return t if note with ID is suspended."
(= (gnosis-get 'suspend 'review-log `(= id ,id)) 1))