Browse Source

Include timestamps in org agenda effort summation

Those correspond to fix appointments.
master
Daniel 10 months ago
parent
commit
7582c2065e
No known key found for this signature in database GPG Key ID: 1C7071A75BB72D64
  1. 3
      site-lisp/db-org.el

3
site-lisp/db-org.el

@ -190,7 +190,8 @@ _y_: ?y? year _q_: quit _L__l__c_: ?l?
(let (total)
(save-excursion
(while (< (point) limit)
(when (member (org-get-at-bol 'type) '("scheduled" "past-scheduled"))
(when (member (org-get-at-bol 'type)
'("scheduled" "past-scheduled" "timestamp"))
(push (org-entry-get (org-get-at-bol 'org-hd-marker) "Effort") total))
(forward-line)))
(org-duration-from-minutes

Loading…
Cancel
Save