emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

master 77c7a79a3f 2/3: * lisp/edmacro.el (edit-kbd-macro): Use command s


From: Stefan Kangas
Subject: master 77c7a79a3f 2/3: * lisp/edmacro.el (edit-kbd-macro): Use command substitution.
Date: Fri, 17 Jun 2022 07:12:18 -0400 (EDT)

branch: master
commit 77c7a79a3fcc0ace2b58ae21b9fcb93bf536d923
Author: Stefan Kangas <stefan@marxist.se>
Commit: Stefan Kangas <stefan@marxist.se>

    * lisp/edmacro.el (edit-kbd-macro): Use command substitution.
---
 lisp/edmacro.el | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/lisp/edmacro.el b/lisp/edmacro.el
index 26f3ae02ab..fe1fc086bc 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")



reply via email to

[Prev in Thread] Current Thread [Next in Thread]