diff options
| author | Stefan Kangas <stefan@marxist.se> | 2022-05-17 17:25:27 +0200 |
|---|---|---|
| committer | Stefan Kangas <stefan@marxist.se> | 2022-05-27 10:00:14 +0200 |
| commit | 7d74b8f632b1af75b837f5b5259cd1758aab1489 (patch) | |
| tree | 2db8b463375349b7d726fe1320e09e52b746fb3c /lisp/progmodes/flymake.el | |
| parent | 4ed0f6e9658279c25f66072c2ddef96aa6f7a93c (diff) | |
| download | emacs-7d74b8f632b1af75b837f5b5259cd1758aab1489.tar.gz emacs-7d74b8f632b1af75b837f5b5259cd1758aab1489.tar.bz2 emacs-7d74b8f632b1af75b837f5b5259cd1758aab1489.zip | |
Prefer defvar-keymap in some progmodes
* lisp/progmodes/asm-mode.el (asm-mode-map):
* lisp/progmodes/bug-reference.el (bug-reference-map):
* lisp/progmodes/erts-mode.el (erts-mode-map):
* lisp/progmodes/flymake.el (flymake-mode-map)
(flymake-diagnostics-buffer-mode-map):
* lisp/progmodes/icon.el (icon-mode-map):
* lisp/progmodes/js.el (js-mode-map):
* lisp/progmodes/m4-mode.el (m4-mode-map):
* lisp/progmodes/mixal-mode.el (mixal-mode-map):
* lisp/progmodes/scheme.el (scheme-mode-map): Prefer defvar-keymap.
Diffstat (limited to 'lisp/progmodes/flymake.el')
| -rw-r--r-- | lisp/progmodes/flymake.el | 13 |
1 files changed, 5 insertions, 8 deletions
diff --git a/lisp/progmodes/flymake.el b/lisp/progmodes/flymake.el index 0b7958e52fb..9e3255874da 100644 --- a/lisp/progmodes/flymake.el +++ b/lisp/progmodes/flymake.el @@ -1080,9 +1080,8 @@ Interactively, with a prefix arg, FORCE is t." (flymake--run-backend backend backend-args))) nil)))))))) -(defvar flymake-mode-map - (let ((map (make-sparse-keymap))) map) - "Keymap for `flymake-mode'.") +(defvar-keymap flymake-mode-map + :doc "Keymap for `flymake-mode'.") ;;;###autoload (define-minor-mode flymake-mode @@ -1493,11 +1492,9 @@ TYPE is usually keyword `:error', `:warning' or `:note'." (defvar-local flymake--diagnostics-buffer-source nil) -(defvar flymake-diagnostics-buffer-mode-map - (let ((map (make-sparse-keymap))) - (define-key map (kbd "RET") 'flymake-goto-diagnostic) - (define-key map (kbd "SPC") 'flymake-show-diagnostic) - map)) +(defvar-keymap flymake-diagnostics-buffer-mode-map + "RET" #'flymake-goto-diagnostic + "SPC" #'flymake-show-diagnostic) (defun flymake-show-diagnostic (pos &optional other-window) "Show location of diagnostic at POS." |