diff options
| author | Stefan Kangas <stefan@marxist.se> | 2021-11-17 04:14:33 +0100 |
|---|---|---|
| committer | Stefan Kangas <stefan@marxist.se> | 2021-11-17 04:24:54 +0100 |
| commit | 4c467e4aff12e65fa4fa62d7f4bdcbf4a2bcd92c (patch) | |
| tree | 976f59ecd707dd52d1ab6e81bde0481194d48015 /admin/gitmerge.el | |
| parent | 2a99138f1766c23cfdbbc86ea5c277b0fbeed7e2 (diff) | |
| download | emacs-4c467e4aff12e65fa4fa62d7f4bdcbf4a2bcd92c.tar.gz emacs-4c467e4aff12e65fa4fa62d7f4bdcbf4a2bcd92c.tar.bz2 emacs-4c467e4aff12e65fa4fa62d7f4bdcbf4a2bcd92c.zip | |
* admin/gitmerge.el (gitmerge-mode-map): Convert to defvar-keymap.
Diffstat (limited to 'admin/gitmerge.el')
| -rw-r--r-- | admin/gitmerge.el | 17 |
1 files changed, 7 insertions, 10 deletions
diff --git a/admin/gitmerge.el b/admin/gitmerge.el index 67fca87c119..5aae6b40a0c 100644 --- a/admin/gitmerge.el +++ b/admin/gitmerge.el @@ -96,16 +96,13 @@ If nil, the function `gitmerge-default-branch' guesses.") (defvar gitmerge-log-regexp "^\\([A-Z ]\\)\\s-*\\([0-9a-f]+\\) \\(.+?\\): \\(.*\\)$") -(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-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-font-lock-keywords `((,gitmerge-log-regexp |