diff --git a/lisp/org-agenda.el b/lisp/org-agenda.el index a482b3db4..83f30bf96 100644 --- a/lisp/org-agenda.el +++ b/lisp/org-agenda.el @@ -9342,7 +9342,7 @@ the same tree node, and the headline of the tree node in the Org file." (save-window-excursion (org-agenda-change-all-lines newhead hdmarker 'fixface just-one)) (when (bound-and-true-p org-clock-out-when-done) - (string-match (concat "^" (regexp-opt org-done-keywords-for-agenda)) + (string-match (concat "^" (regexp-opt org-done-keywords-for-agenda)) newhead) (org-agenda-unmark-clocking-task)) (org-move-to-column col) diff --git a/lisp/org.el b/lisp/org.el index f973ab6f0..91b70e533 100644 --- a/lisp/org.el +++ b/lisp/org.el @@ -4189,7 +4189,7 @@ After a match, the following groups carry important information: "Variable associated with STARTUP options for Org. Each element is a list of three items: the startup options (as written in the #+STARTUP line), the corresponding variable, and the value to set -this variable to if the option is found. An optional forth element PUSH +this variable to if the option is found. An optional fourth element PUSH means to push this value onto the list in the variable.") (defcustom org-group-tags t