From e53e4cc48fb3f3cddd08cdfe0877f8354be253a9 Mon Sep 17 00:00:00 2001 From: Cash Weaver Date: Sun, 18 Sep 2022 07:00:08 -0700 Subject: feat: Show total positions in dashboard --- org-fc-dashboard.el | 3 +++ 1 file changed, 3 insertions(+) diff --git a/org-fc-dashboard.el b/org-fc-dashboard.el index cf25056..9165d5a 100644 --- a/org-fc-dashboard.el +++ b/org-fc-dashboard.el @@ -121,6 +121,7 @@ environment without svg support." (cl-incf avg-interval (plist-get pos :interval))))) (cl-incf (gethash (plist-get card :type) by-type 0) 1)) (list :total total + :total-positions n-pos :suspended suspended :due due :by-type (org-fc-dashboard--hashtable-to-alist by-type) @@ -210,6 +211,8 @@ environment without svg support." (insert (propertize "Position Statistics\n\n" 'face 'org-level-1)) + (insert (format " Total: %d\n\n" + (plist-get stats :total-positions))) (insert (format " Due: %d (now) %d (day) %d (week) %d (month)\n\n" (plist-get due-stats :now) (plist-get due-stats :day) -- cgit v1.2.3