diff --git a/lisp/ChangeLog b/lisp/ChangeLog index de4f868bb..2b7e7837f 100755 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,5 +1,8 @@ 2009-03-23 Carsten Dominik + * org-clock.el (org-clock-out-if-current): Make buffer detection + work in indirect buffers as well. + * org.el (org-emphasis-regexp-components): Add the exxclamation mark to the post-emphasis characters. diff --git a/lisp/org-clock.el b/lisp/org-clock.el index 8d2279ae0..49539a165 100644 --- a/lisp/org-clock.el +++ b/lisp/org-clock.el @@ -663,7 +663,10 @@ This is used to stop the clock after a TODO entry is marked DONE, and is only done if the variable `org-clock-out-when-done' is not nil." (when (and org-clock-out-when-done (member state org-done-keywords) - (equal (marker-buffer org-clock-marker) (current-buffer)) + (equal (or (buffer-base-buffer (marker-buffer org-clock-marker)) + (marker-buffer org-clock-marker)) + (or (buffer-base-buffer (current-buffer)) + (current-buffer))) (< (point) org-clock-marker) (> (save-excursion (outline-next-heading) (point)) org-clock-marker))