Use more help-key-binding faces in repeat-mode message

* lisp/repeat.el (repeat-echo-message-string): Use
substitute-command-keys for repeat-exit-key as well.

diff --git a/lisp/repeat.el b/lisp/repeat.el
index 6bbed95449592e849635c60cfd451ecdbe547c17..608f7aaf987be9a632917931856729d86416003b 100644 (file)
--- a/lisp/repeat.el
+++ b/lisp/repeat.el
@@ -508,8 +508,9 @@ See `describe-repeat-maps' for a list of all repeatable commands."
                                           (key-description (vector key)))))
                                keys ", ")
                     (if repeat-exit-key
-                        (format ", or exit with %s"
-                                (key-description repeat-exit-key))
+                        (substitute-command-keys
+                         (format ", or exit with \\`%s'"
+                                 (key-description repeat-exit-key)))
                       ""))))
 
 (defun repeat-echo-message (keymap)