Don't issue kmacro hint if echo area is in use (Bug#3412).
* lisp/kmacro.el (kmacro-call-macro): Don't issue hint message if the echo area is in use (Bug#3412).
This commit is contained in:
parent
3b3807f859
commit
8f8043160b
2 changed files with 12 additions and 5 deletions
|
@ -1,3 +1,8 @@
|
|||
2010-06-24 Chong Yidong <cyd@stupidchicken.com>
|
||||
|
||||
* kmacro.el (kmacro-call-macro): Don't issue hint message if the
|
||||
echo area is in use (Bug#3412).
|
||||
|
||||
2010-06-22 Glenn Morris <rgm@gnu.org>
|
||||
|
||||
* textmodes/texinfmt.el (texinfo-format-region)
|
||||
|
|
|
@ -642,11 +642,13 @@ others, use \\[kmacro-name-last-macro]."
|
|||
kmacro-call-repeat-key)))
|
||||
(setq repeat-key-str (format-kbd-macro (vector repeat-key) nil))
|
||||
(while repeat-key
|
||||
(message "(Type %s to repeat macro%s)"
|
||||
repeat-key-str
|
||||
(if (and kmacro-call-repeat-with-arg
|
||||
arg (> arg 1))
|
||||
(format " %d times" arg) ""))
|
||||
;; Issue a hint to the user, if the echo area isn't in use.
|
||||
(unless (current-message)
|
||||
(message "(Type %s to repeat macro%s)"
|
||||
repeat-key-str
|
||||
(if (and kmacro-call-repeat-with-arg
|
||||
arg (> arg 1))
|
||||
(format " %d times" arg) "")))
|
||||
(if (equal repeat-key (read-event))
|
||||
(progn
|
||||
(clear-this-command-keys t)
|
||||
|
|
Loading…
Add table
Reference in a new issue