From 774880c84cdb9998d3e73854f0067ff6e1c18b99 Mon Sep 17 00:00:00 2001 From: Po Lu Date: Mon, 30 May 2022 18:09:41 +0800 Subject: [PATCH] Get rid of `defvar-keymap' in flymake.el * lisp/progmodes/flymake.el (flymake-mode-map) (flymake-diagnostics-buffer-mode-map): Stop using `defvar-keymap', since Flymake only requires Emacs 26.1. --- lisp/progmodes/flymake.el | 13 ++++++++----- 1 file changed, 8 insertions(+), 5 deletions(-) diff --git a/lisp/progmodes/flymake.el b/lisp/progmodes/flymake.el index 9e3255874da..0b7958e52fb 100644 --- a/lisp/progmodes/flymake.el +++ b/lisp/progmodes/flymake.el @@ -1080,8 +1080,9 @@ Interactively, with a prefix arg, FORCE is t." (flymake--run-backend backend backend-args))) nil)))))))) -(defvar-keymap flymake-mode-map - :doc "Keymap for `flymake-mode'.") +(defvar flymake-mode-map + (let ((map (make-sparse-keymap))) map) + "Keymap for `flymake-mode'.") ;;;###autoload (define-minor-mode flymake-mode @@ -1492,9 +1493,11 @@ TYPE is usually keyword `:error', `:warning' or `:note'." (defvar-local flymake--diagnostics-buffer-source nil) -(defvar-keymap flymake-diagnostics-buffer-mode-map - "RET" #'flymake-goto-diagnostic - "SPC" #'flymake-show-diagnostic) +(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)) (defun flymake-show-diagnostic (pos &optional other-window) "Show location of diagnostic at POS." -- 2.39.2