forked from mirrors/org-mode
org-clock.el (org-clock-select-task): Kill temporary buffer
* org-clock.el (org-clock-select-task): Kill temporary buffer. Thanks to Marcin Borkowski for this idea.
This commit is contained in:
parent
63afc9b20d
commit
eb973f90a9
|
@ -581,6 +581,7 @@ of a different task.")
|
||||||
(fit-window-to-buffer nil nil (if (< chl 10) chl (+ 5 chl)))
|
(fit-window-to-buffer nil nil (if (< chl 10) chl (+ 5 chl)))
|
||||||
(message (or prompt "Select task for clocking:"))
|
(message (or prompt "Select task for clocking:"))
|
||||||
(setq cursor-type nil rpl (read-char-exclusive))
|
(setq cursor-type nil rpl (read-char-exclusive))
|
||||||
|
(kill-buffer)
|
||||||
(cond
|
(cond
|
||||||
((eq rpl ?q) nil)
|
((eq rpl ?q) nil)
|
||||||
((eq rpl ?x) nil)
|
((eq rpl ?x) nil)
|
||||||
|
|
Loading…
Reference in New Issue