summaryrefslogtreecommitdiff
path: root/org-fc-dashboard.el
diff options
context:
space:
mode:
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)