From: Stefan Kangas <stefan@marxist.se>
Date: Fri, 17 Jun 2022 10:18:26 +0000 (+0200)
Subject: * lisp/edmacro.el (edit-kbd-macro): Use command substitution.
X-Git-Tag: emacs-29.0.90~1447^2~1688
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=77c7a79a3fcc0ace2b58ae21b9fcb93bf536d923;p=emacs.git

* lisp/edmacro.el (edit-kbd-macro): Use command substitution.
---

diff --git a/lisp/edmacro.el b/lisp/edmacro.el
index 26f3ae02aba..fe1fc086bc6 100644
--- a/lisp/edmacro.el
+++ b/lisp/edmacro.el
@@ -154,8 +154,10 @@ With a prefix argument, format the macro in a more concise way."
         (setq-local edmacro-finish-hook finish-hook)
         (setq-local edmacro-store-hook store-hook)
 	(erase-buffer)
-	(insert ";; Keyboard Macro Editor.  Press C-c C-c to finish; "
-		"press C-x k RET to cancel.\n")
+        (insert (substitute-command-keys
+                 (concat
+                  ";; Keyboard Macro Editor.  Press \\[edmacro-finish-edit] "
+                  "to finish; press \\`C-x k RET' to cancel.\n")))
 	(insert ";; Original keys: " fmt "\n")
 	(unless store-hook
 	  (insert "\nCommand: " (if cmd (symbol-name cmd) "none") "\n")