[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master 774880c84c: Get rid of `defvar-keymap' in flymake.el
From: |
Po Lu |
Subject: |
master 774880c84c: Get rid of `defvar-keymap' in flymake.el |
Date: |
Mon, 30 May 2022 06:10:14 -0400 (EDT) |
branch: master
commit 774880c84cdb9998d3e73854f0067ff6e1c18b99
Author: Po Lu <luangruo@yahoo.com>
Commit: Po Lu <luangruo@yahoo.com>
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 9e3255874d..0b7958e52f 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."
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- master 774880c84c: Get rid of `defvar-keymap' in flymake.el,
Po Lu <=