summaryrefslogtreecommitdiff
path: root/org-fc-dashboard.el
diff options
context:
space:
mode:
authorLeon <gh@leonrische.me>2022-09-18 16:25:23 +0200
committerGitHub <noreply@github.com>2022-09-18 16:25:23 +0200
commit96245b721f7bf62bb330b2aef717351e063bcaa4 (patch)
tree750b9d6b72443021531be23c041849f2ec041b37 /org-fc-dashboard.el
parent9bdc59cd0d1d979bf0f073224a947c53391f4c05 (diff)
parente53e4cc48fb3f3cddd08cdfe0877f8354be253a9 (diff)
Merge pull request #91 from cashweaver/feat/total-positions
feat: Show total positions in dashboard
Diffstat (limited to 'org-fc-dashboard.el')
-rw-r--r--org-fc-dashboard.el3
1 files changed, 3 insertions, 0 deletions
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)