org-clock: Preserve narrowing when building clock table

* lisp/org-clock.el (org-dblock-write:clocktable): Preserve current
  narrowing, if any, when building the table.

Reported-by: Christof Musik <ml-orgmode@litephone.org>
<http://permalink.gmane.org/gmane.emacs.orgmode/112872>
This commit is contained in:
Nicolas Goaziou 2017-03-29 16:33:10 +02:00
parent a08dd527d9
commit df0c7d96a2
1 changed files with 21 additions and 20 deletions

View File

@ -2409,6 +2409,7 @@ the currently selected interval size."
(org-clock-get-table-data file params)))))
files)
;; Get the right restriction for the scope.
(save-restriction
(cond
((not scope)) ;use the restriction as it is now
((eq scope 'file) (widen))
@ -2428,7 +2429,7 @@ the currently selected interval size."
level)
(throw 'exit nil))))
(org-narrow-to-subtree))))
(list (org-clock-get-table-data nil params))))
(list (org-clock-get-table-data nil params)))))
(multifile
;; Even though `file-with-archives' can consist of
;; multiple files, we consider this is one extended file