emacs-diffs
[Top][All Lists]
Advanced

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

master 32f1ec449d 2/2: * lisp/abbrev.el (edit-abbrevs-mode-map): Use def


From: Stefan Kangas
Subject: master 32f1ec449d 2/2: * lisp/abbrev.el (edit-abbrevs-mode-map): Use defvar-keymap.
Date: Sun, 9 Jan 2022 19:15:11 -0500 (EST)

branch: master
commit 32f1ec449d760a2a551fb411808d0b4c7d64418c
Author: Stefan Kangas <stefan@marxist.se>
Commit: Stefan Kangas <stefan@marxist.se>

    * lisp/abbrev.el (edit-abbrevs-mode-map): Use defvar-keymap.
---
 lisp/abbrev.el | 12 +++++-------
 1 file changed, 5 insertions(+), 7 deletions(-)

diff --git a/lisp/abbrev.el b/lisp/abbrev.el
index 515c046ce5..8247130e32 100644
--- a/lisp/abbrev.el
+++ b/lisp/abbrev.el
@@ -67,13 +67,11 @@ be replaced by its expansion."
 
 (define-obsolete-variable-alias 'edit-abbrevs-map
   'edit-abbrevs-mode-map "24.4")
-(defvar edit-abbrevs-mode-map
-  (let ((map (make-sparse-keymap)))
-    (define-key map "\C-x\C-s" 'abbrev-edit-save-buffer)
-    (define-key map "\C-x\C-w" 'abbrev-edit-save-to-file)
-    (define-key map "\C-c\C-c" 'edit-abbrevs-redefine)
-    map)
-  "Keymap used in `edit-abbrevs'.")
+(defvar-keymap edit-abbrevs-mode-map
+  :doc "Keymap used in `edit-abbrevs'."
+  "C-x C-s" #'abbrev-edit-save-buffer
+  "C-x C-w" #'abbrev-edit-save-to-file
+  "C-c C-c" #'edit-abbrevs-redefine)
 
 (defun kill-all-abbrevs ()
   "Undefine all defined abbrevs."



reply via email to

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