From: Juri Linkov <juri@linkov.net>
Date: Sun, 3 Jul 2022 17:02:02 +0000 (+0300)
Subject: Use more help-key-binding faces in repeat-mode message
X-Git-Tag: emacs-29.0.90~1447^2~1228
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=ae31dd53069ad71772387f8abed3ebf2e1b54b5a;p=emacs.git

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 6bbed954495..608f7aaf987 100644
--- 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)