[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[O] [PATCH] org-clock.el: Clear org-clock-current-task on clock cancel
From: |
me |
Subject: |
[O] [PATCH] org-clock.el: Clear org-clock-current-task on clock cancel |
Date: |
Sat, 15 Jun 2019 01:20:15 -0400 |
From: "Aaron L. Zeng" <address@hidden>
* org-mode/lisp/org-clock.el (org-clock-cancel): Clear
`org-clock-current-task' when a clock is canceled.
This variable is used by some mode line packages (e.g.,
spaceline-all-the-icons), so not clearing the variable incorrectly
displays the previous task as ongoing.
---
lisp/org-clock.el | 1 +
1 file changed, 1 insertion(+)
diff --git a/lisp/org-clock.el b/lisp/org-clock.el
index 12b412f7b..3d8e1136a 100644
--- a/lisp/org-clock.el
+++ b/lisp/org-clock.el
@@ -1741,6 +1741,7 @@ Optional argument N tells to change by that many units."
(sit-for 2)))
(move-marker org-clock-marker nil)
(move-marker org-clock-hd-marker nil)
+ (setq org-clock-current-task nil)
(setq global-mode-string
(delq 'org-mode-line-string global-mode-string))
(org-clock-restore-frame-title-format)
--
2.20.1 (Apple Git-117)
- [O] [PATCH] org-clock.el: Clear org-clock-current-task on clock cancel,
me <=