branch: externals-release/org
commit 5dbf930c2d36f9df45600a7a3714b7e3beb2ec09
Author: Ihor Radchenko <[email protected]>
Commit: Ihor Radchenko <[email protected]>
org-agenda-clock-cancel: Unmark clocking tasks in the agenda buffer
* lisp/org-agenda.el (org-agenda-clock-cancel): When canceling clock,
remove clocking overlays from current agenda buffer.
---
lisp/org-agenda.el | 3 ++-
1 file changed, 2 insertions(+), 1 deletion(-)
diff --git a/lisp/org-agenda.el b/lisp/org-agenda.el
index 10ca43220a..c60c2086b3 100644
--- a/lisp/org-agenda.el
+++ b/lisp/org-agenda.el
@@ -10543,7 +10543,8 @@ ARG is passed through to `org-deadline'."
(unless (marker-buffer org-clock-marker)
(user-error "No running clock"))
(org-with-remote-undo (marker-buffer org-clock-marker)
- (org-clock-cancel)))
+ (org-clock-cancel))
+ (org-agenda-unmark-clocking-task))
(defun org-agenda-clock-goto ()
"Jump to the currently clocked in task within the agenda.
