emacs-elpa-diffs
[Top][All Lists]
Advanced

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

[nongnu] elpa/macrostep a9cf8ea8c5 1/3: * macrostep.el (macrostep-mode-m


From: ELPA Syncer
Subject: [nongnu] elpa/macrostep a9cf8ea8c5 1/3: * macrostep.el (macrostep-mode-map): Fix name to follow convention
Date: Thu, 18 May 2023 16:00:31 -0400 (EDT)

branch: elpa/macrostep
commit a9cf8ea8c52a01ba3fe73fa85e3467bb3af19a81
Author: Stefan Monnier <monnier@iro.umontreal.ca>
Commit: Jonas Bernoulli <jonas@bernoul.li>

    * macrostep.el (macrostep-mode-map): Fix name to follow convention
---
 macrostep.el | 11 ++++++-----
 1 file changed, 6 insertions(+), 5 deletions(-)

diff --git a/macrostep.el b/macrostep.el
index 2650060795..3fd42aa6c7 100644
--- a/macrostep.el
+++ b/macrostep.el
@@ -457,8 +457,9 @@ The default value, `macrostep-macro-form-p', is specific to 
Emacs Lisp.")
 
 
 ;;; Define keymap and minor mode
-(define-obsolete-variable-alias 'macrostep-keymap 'macrostep-mode-keymap 
"2022")
-(defvar macrostep-mode-keymap
+(define-obsolete-variable-alias 'macrostep-mode-keymap 'macrostep-mode-map 
"2023")
+(define-obsolete-variable-alias 'macrostep-keymap 'macrostep-mode-map "2022")
+(defvar macrostep-mode-map
   (let ((map (make-sparse-keymap)))
     (define-key map (kbd "RET") #'macrostep-expand)
     (define-key map "=" #'macrostep-expand)
@@ -482,12 +483,12 @@ The default value, `macrostep-macro-form-p', is specific 
to Emacs Lisp.")
 (define-minor-mode macrostep-mode
   "Minor mode for inline expansion of macros in Emacs Lisp source buffers.
 
-\\<macrostep-keymap>Progressively expand macro forms with 
\\[macrostep-expand], collapse them with \\[macrostep-collapse],
+\\<macrostep-mode-map>Progressively expand macro forms with 
\\[macrostep-expand], collapse them with \\[macrostep-collapse],
 and move back and forth with \\[macrostep-next-macro] and 
\\[macrostep-prev-macro].
 Use \\[macrostep-collapse-all] or collapse all visible expansions to
 quit and return to normal editing.
 
-\\{macrostep-keymap}"
+\\{macrostep-mode-map}"
   :lighter " Macro-Stepper"
   :group 'macrostep
   (if macrostep-mode
@@ -502,7 +503,7 @@ quit and return to normal editing.
         (add-hook 'post-command-hook #'macrostep-command-hook nil t)
         (message
          (substitute-command-keys
-          "\\<macrostep-keymap>Entering macro stepper mode. Use 
\\[macrostep-expand] to expand, \\[macrostep-collapse] to collapse, 
\\[macrostep-collapse-all] to exit.")))
+          "\\<macrostep-mode-map>Entering macro stepper mode. Use 
\\[macrostep-expand] to expand, \\[macrostep-collapse] to collapse, 
\\[macrostep-collapse-all] to exit.")))
 
     ;; Exiting mode
     (if macrostep-expansion-buffer



reply via email to

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