[Top][All Lists]

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

master 176c632: Convert etc-authors-mode-map to defvar-keymap

From: Stefan Kangas
Subject: master 176c632: Convert etc-authors-mode-map to defvar-keymap
Date: Tue, 7 Dec 2021 19:57:53 -0500 (EST)

branch: master
commit 176c63287ffdf56634984494f6610102737f393e
Author: Stefan Kangas <stefan@marxist.se>
Commit: Stefan Kangas <stefan@marxist.se>

    Convert etc-authors-mode-map to defvar-keymap
    * lisp/textmodes/etc-authors-mode.el (etc-authors-mode-map):
    Convert to defvar-keymap.
 lisp/textmodes/etc-authors-mode.el | 10 ++++------
 1 file changed, 4 insertions(+), 6 deletions(-)

diff --git a/lisp/textmodes/etc-authors-mode.el 
index 8b5fefd..a79a1ec 100644
--- a/lisp/textmodes/etc-authors-mode.el
+++ b/lisp/textmodes/etc-authors-mode.el
@@ -115,12 +115,10 @@ With a prefix arg ARG, move point that many authors 
   (interactive "p" etc-authors-mode)
   (etc-authors-next-author (- arg)))
-(defvar etc-authors-mode-map
-  (let ((map (make-sparse-keymap)))
-    (define-key map "n" #'etc-authors-next-author)
-    (define-key map "p" #'etc-authors-prev-author)
-    map)
-  "Keymap for `etc-authors-mode'.")
+(defvar-keymap etc-authors-mode-map
+  :doc "Keymap for `etc-authors-mode'."
+  "n" #'etc-authors-next-author
+  "p" #'etc-authors-prev-author)
 (define-derived-mode etc-authors-mode special-mode "Authors View"

reply via email to

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