tec/org-mode
tec
/
org-mode
forked from mirrors/org-mode
1
0
Fork 0
Code Pull Requests Releases Activity

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:
Bastien Guerry 2014-10-20 15:27:46 +02:00
parent 63afc9b20d
commit eb973f90a9
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
lisp/org-clock.el
View File

@ -581,6 +581,7 @@ of a different task.")
(fit-window-to-buffer nil nil (if (< chl 10) chl (+ 5 chl)))
(message (or prompt "Select task for clocking:"))
(setq cursor-type nil rpl (read-char-exclusive))
(kill-buffer)
(cond
((eq rpl ?q) nil)
((eq rpl ?x) nil)