|
@@ -1839,6 +1839,7 @@ the currently selected interval size."
|
|
|
(setq p1 (plist-put p1 :scope 'file))
|
|
|
(org-prepare-agenda-buffers files)
|
|
|
(while (setq file (pop files))
|
|
|
+ (setq org-clock-file-total-minutes 0)
|
|
|
(with-current-buffer (find-buffer-visiting file)
|
|
|
(setq tbl1 (org-dblock-write:clocktable p1))
|
|
|
(when tbl1
|
|
@@ -1848,9 +1849,9 @@ the currently selected interval size."
|
|
|
(org-minutes-to-hh:mm-string
|
|
|
org-clock-file-total-minutes)
|
|
|
"*|\n"
|
|
|
- tbl1)) tbl)
|
|
|
- (setq total-time (+ (or total-time 0)
|
|
|
- org-clock-file-total-minutes))))))))
|
|
|
+ tbl1)) tbl))
|
|
|
+ (setq total-time (+ (or total-time 0)
|
|
|
+ org-clock-file-total-minutes)))))))
|
|
|
(goto-char pos)
|
|
|
|
|
|
(unless scope-is-list
|