[Org] Keep point and mark when iterating over clock lines and headlines

2018-01-13 12:49:43 +01:00 · 2018-01-13 12:49:43 +01:00 · b81a152d42
commit b81a152d42
parent 0d2e773d9d
1 changed files with 4 additions and 2 deletions
--- a/site-lisp/db-org.el
+++ b/site-lisp/db-org.el
@ -957,10 +957,12 @@ end of the file upwards."
          (cond
           ((match-end 2)
            ;; Two time stamps.
-            (funcall clockline-fn (match-string 2) (match-string 3)))
+            (save-mark-and-excursion
+             (funcall clockline-fn (match-string 2) (match-string 3))))
           (t
            ;; A headline
-            (funcall headline-fn))))))))
+            (save-mark-and-excursion
+             (funcall headline-fn)))))))))

 (defun db/org-clocking-time-in-range (tstart tend)
  "Return list of all tasks in the current buffer together with