lisp/org-clock.el: Fix bug in prompt for resolving clocks
* lisp/org-clock.el (org-clock-resolve): Avoid unwanted disappearing of the prompt when clicking somewhere, by using `read-char-exclusive' instead of `read-char'. Link: https://orgmode.org/list/87o82yaeie.fsf@gmail.com TINYCHANGE
This commit is contained in:
parent
04d9d4b3db
commit
de553d1dc7
|
@ -1101,9 +1101,9 @@ to be CLOCKED OUT."))))
|
|||
?j ?J ?i ?q ?t ?T)))
|
||||
(or (ding) t)))
|
||||
(setq char-pressed
|
||||
(read-char (concat (funcall prompt-fn clock)
|
||||
" [jkKtTgGSscCiq]? ")
|
||||
nil 45)))
|
||||
(read-char-exclusive (concat (funcall prompt-fn clock)
|
||||
" [jkKtTgGSscCiq]? ")
|
||||
nil 45)))
|
||||
(and (not (memq char-pressed '(?i ?q))) char-pressed)))))
|
||||
(default
|
||||
(floor (org-time-convert-to-integer (time-since last-valid))
|
||||
|
|
Loading…
Reference in New Issue