org-agenda.el (org-agenda-todo): Mark the clocking task

* org-agenda.el (org-agenda-todo): Mark the clocking task.
This commit is contained in:
Bastien Guerry 2014-05-31 14:32:06 +02:00
parent dd17e9d299
commit 75ca2a0e0d
1 changed files with 2 additions and 1 deletions

View File

@ -8839,7 +8839,8 @@ the same tree node, and the headline of the tree node in the Org-mode file."
(string-match (concat "^" (regexp-opt org-done-keywords-for-agenda)) (string-match (concat "^" (regexp-opt org-done-keywords-for-agenda))
newhead) newhead)
(org-agenda-unmark-clocking-task)) (org-agenda-unmark-clocking-task))
(org-move-to-column col)))) (org-move-to-column col)
(org-agenda-mark-clocking-task))))
(defun org-agenda-add-note (&optional arg) (defun org-agenda-add-note (&optional arg)
"Add a time-stamped note to the entry at point." "Add a time-stamped note to the entry at point."