summaryrefslogtreecommitdiff
path: root/gnosis.el
diff options
context:
space:
mode:
authorThanos Apollo <[email protected]>2024-01-04 09:40:55 +0200
committerThanos Apollo <[email protected]>2024-01-04 09:40:55 +0200
commit248bd3876235f7c97021c5dd3c5e825d295676fb (patch)
tree34490b6b49c6dcbd5293a2e25532e39f0aa337b2 /gnosis.el
parent360fa413a3dd2c690604ac1c06d2e791a668fe2a (diff)
Add gnosis-due-tags
Diffstat (limited to 'gnosis.el')
-rw-r--r--gnosis.el10
1 files changed, 9 insertions, 1 deletions
diff --git a/gnosis.el b/gnosis.el
index f84b34a..47a5d33 100644
--- a/gnosis.el
+++ b/gnosis.el
@@ -710,7 +710,15 @@ if DUE is t, return only due notes"
when (not (gnosis-suspended-p note))
collect note)))
-(defun gnosis-tag-prompt (&optional prompt match)
+(defun gnosis-due-tags ()
+ "Return a list of due note tags."
+ (let ((due-notes (gnosis-review-get-due-notes)))
+ (cl-remove-duplicates
+ (cl-mapcan (lambda (note-id)
+ (gnosis-get-note-tags note-id))
+ due-notes)
+ :test 'equal)))
+
"PROMPT user to select tags, until they enter `q'.
Prompt user to select tags, generated from `gnosis-get-tags--unique'.