summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--gnosis-dashboard.el13
1 files changed, 13 insertions, 0 deletions
diff --git a/gnosis-dashboard.el b/gnosis-dashboard.el
index 9b7f4c8..528c570 100644
--- a/gnosis-dashboard.el
+++ b/gnosis-dashboard.el
@@ -67,6 +67,19 @@
'((t :foreground "#ff0a6a" :weight bold))
"My custom face for both light and dark backgrounds.")
+(defun gnosis-dashboard-return (&optional current-values)
+ "Return to dashboard for CURRENT-VALUES."
+ (interactive)
+ (let* ((current-values (or current-values gnosis-dashboard--current))
+ (type (plist-get current-values :type))
+ (ids (plist-get current-values :ids)))
+ (cond ((eq type 'notes)
+ (gnosis-dashboard-output-notes ids))
+ ((eq type 'decks )
+ (gnosis-dashboard-output-decks))
+ ((eq type 'tags )
+ (gnosis-dashboard-output-tags)))))
+
(defun gnosis-dashboard-generate-dates (&optional year)
"Return a list of all dates (year month day) for YEAR."
(let* ((current-year (or (decoded-time-year (decode-time)) year))