Use help-key-binding face in repeat-mode message
* lisp/repeat.el (repeat-echo-message-string): Use substitute-command-keys.
This commit is contained in:
parent
ad73b588d4
commit
4b9b1ea6a0
1 changed files with 3 additions and 1 deletions
|
@ -503,7 +503,9 @@ See `describe-repeat-maps' for a list of all repeatable commands."
|
|||
(map-keymap (lambda (key cmd) (and cmd (push key keys))) keymap)
|
||||
(format-message "Repeat with %s%s"
|
||||
(mapconcat (lambda (key)
|
||||
(key-description (vector key)))
|
||||
(substitute-command-keys
|
||||
(format "\\`%s'"
|
||||
(key-description (vector key)))))
|
||||
keys ", ")
|
||||
(if repeat-exit-key
|
||||
(format ", or exit with %s"
|
||||
|
|
Loading…
Add table
Reference in a new issue