summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorThanos Apollo <[email protected]>2024-08-03 18:53:19 +0300
committerThanos Apollo <[email protected]>2024-08-03 18:53:19 +0300
commit56640df45c10dd285bbcafd1c7331c44c434df12 (patch)
tree7d84fca8026f5ac3e41346da131eb4f6eb54bd58
parent515a7009c535346a12ecf3ec823f4d0963bc0c61 (diff)
New function: dashboard-output-tag.
* Output tag name and total notes for tag.
-rw-r--r--gnosis-dashboard.el5
1 files changed, 5 insertions, 0 deletions
diff --git a/gnosis-dashboard.el b/gnosis-dashboard.el
index a4d22a4..6f4a7ca 100644
--- a/gnosis-dashboard.el
+++ b/gnosis-dashboard.el
@@ -266,6 +266,11 @@ Optionally, use when using multiple months."
(when (gnosis-select 'id 'decks `(= id ,id))
(list (number-to-string note-count)))))
+(defun gnosis-dashboard-output-tag (tag)
+ "Output TAG name and total notes."
+ (let ((notes (gnosis-get-tag-notes tag)))
+ `(,tag ,(number-to-string (length notes)))))
+
(defun gnosis-dashboard-output-deck (id)
"Output contents from deck with ID, formatted for gnosis dashboard."
(cl-loop for item in (append (gnosis-select