summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorThanos Apollo <[email protected]>2024-08-03 19:01:36 +0300
committerThanos Apollo <[email protected]>2024-08-03 19:01:36 +0300
commit41b5157be52772dadfecd9bbc660e0af2efa4581 (patch)
tree91ebeee7b7b98cbd9d4a05dbc08e61fe68d722a6
parentfb52e080855f1533907fcd831a5d22803773dd63 (diff)
New function: dashboard-decks-view-deck.
* View deck notes for DECK-ID.
-rw-r--r--gnosis-dashboard.el6
1 files changed, 6 insertions, 0 deletions
diff --git a/gnosis-dashboard.el b/gnosis-dashboard.el
index 331e19f..dee5273 100644
--- a/gnosis-dashboard.el
+++ b/gnosis-dashboard.el
@@ -383,6 +383,12 @@ When called with called with a prefix, unsuspend all notes of deck."
(gnosis-dashboard-output-decks)
(revert-buffer t t t)))
+(defun gnosis-dashboard-decks-view-deck (&optional deck-id)
+ "View notes of DECK-ID."
+ (interactive)
+ (let ((deck-id (or deck-id (string-to-number (tabulated-list-get-id)))))
+ (gnosis-dashboard-output-notes (gnosis-collect-note-ids :deck deck-id))))
+
(defvar-keymap gnosis-dashboard-mode-map
:doc "gnosis-dashboard keymap"
"q" #'quit-window)