[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[O] *Clock Task Select* - feature request
From: |
Marcin Borkowski |
Subject: |
[O] *Clock Task Select* - feature request |
Date: |
Wed, 15 Oct 2014 22:47:14 +0200 |
Hi list,
I'd love it if *Clock Task Select* were buried (or better, killed) after
use. (Is there ever a scenario when someone might want it not to be
killed?) It seems that this should do:
================================================
*** /home/marcin/.emacs.d/elpa/org-20140116/org-clock.el
--- #<buffer org-clock.el>
***************
*** 559,564 ****
--- 559,565 ----
(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)
***************
*** 975,980 ****
--- 976,982 ----
(read-char (concat (funcall prompt-fn clock)
" [jkKgGSscCiq]? ")
nil 45)))
+ (kill-buffer)
(and (not (memq char-pressed '(?i ?q))) char-pressed)))))
(default
(floor (/ (org-float-time
================================================
(the second addition should kill the buffer with the menu shown after
some idle time, though I didn't test it).
Best,
--
Marcin Borkowski
http://octd.wmi.amu.edu.pl/en/Marcin_Borkowski
Adam Mickiewicz University
- [O] *Clock Task Select* - feature request,
Marcin Borkowski <=