[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: [O] *Clock Task Select* - feature request
From: |
Bastien |
Subject: |
Re: [O] *Clock Task Select* - feature request |
Date: |
Mon, 20 Oct 2014 15:28:30 +0200 |
User-agent: |
Gnus/5.130012 (Ma Gnus v0.12) Emacs/25.0.50 (gnu/linux) |
Hi Marcin,
Marcin Borkowski <address@hidden> writes:
> 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).
Good idea, I pushed this change. I don't think the second kill-buffer
is necessary, as this buffer is already temporary. Let me know if I'm
wrong.
Thanks,
--
Bastien