Browse Source

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.
Bastien Guerry 10 years ago
parent
commit
eb973f90a9
1 changed files with 1 additions and 0 deletions
  1. 1 0
      lisp/org-clock.el

+ 1 - 0
lisp/org-clock.el

@@ -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)