]> git.eshelyaron.com Git - emacs.git/commitdiff
Revert "* admin/gitmerge.el (gitmerge-mode-map): Convert to defvar-keymap."
authorStefan Kangas <stefan@marxist.se>
Sun, 21 Nov 2021 09:10:07 +0000 (10:10 +0100)
committerStefan Kangas <stefan@marxist.se>
Sun, 21 Nov 2021 09:10:46 +0000 (10:10 +0100)
This reverts commit 4c467e4aff12e65fa4fa62d7f4bdcbf4a2bcd92c.

admin/gitmerge.el

index 5aae6b40a0c99d6196981140c129e4776b5a3d12..67fca87c119ebe514b54ed37dcaf89ffcfa25bd9 100644 (file)
@@ -96,13 +96,16 @@ If nil, the function `gitmerge-default-branch' guesses.")
 (defvar gitmerge-log-regexp
   "^\\([A-Z ]\\)\\s-*\\([0-9a-f]+\\) \\(.+?\\): \\(.*\\)$")
 
-(defvar-keymap gitmerge-mode-map
-  :doc "Keymap for gitmerge major mode."
-  "l" #'gitmerge-show-log
-  "d" #'gitmerge-show-diff
-  "f" #'gitmerge-show-files
-  "s" #'gitmerge-toggle-skip
-  "m" #'gitmerge-start-merge)
+(defvar gitmerge-mode-map
+  (let ((map (make-keymap)))
+    (define-key map [(l)] 'gitmerge-show-log)
+    (define-key map [(d)] 'gitmerge-show-diff)
+    (define-key map [(f)] 'gitmerge-show-files)
+    (define-key map [(s)] 'gitmerge-toggle-skip)
+    (define-key map [(m)] 'gitmerge-start-merge)
+    map)
+  "Keymap for gitmerge major mode.")
+
 
 (defvar gitmerge-mode-font-lock-keywords
   `((,gitmerge-log-regexp