[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[nongnu] elpa/sweeprolog f330794d63 3/3: PORT: don't use defvar-keymap,
From: |
ELPA Syncer |
Subject: |
[nongnu] elpa/sweeprolog f330794d63 3/3: PORT: don't use defvar-keymap, introduced only in Emacs 29 |
Date: |
Thu, 6 Oct 2022 15:59:11 -0400 (EDT) |
branch: elpa/sweeprolog
commit f330794d6323f9fd70e70180fc8bbbf1091441db
Author: Eshel Yaron <me@eshelyaron.com>
Commit: Eshel Yaron <me@eshelyaron.com>
PORT: don't use defvar-keymap, introduced only in Emacs 29
---
sweeprolog.el | 16 +++++++++-------
1 file changed, 9 insertions(+), 7 deletions(-)
diff --git a/sweeprolog.el b/sweeprolog.el
index bd78bf4f43..72501afdc8 100644
--- a/sweeprolog.el
+++ b/sweeprolog.el
@@ -6,7 +6,7 @@
;; Maintainer: Eshel Yaron <~eshel/dev@lists.sr.ht>
;; Keywords: prolog languages extensions
;; URL: https://git.sr.ht/~eshel/sweep
-;; Package-Version: 0.5.0
+;; Package-Version: 0.5.1
;; Package-Requires: ((emacs "28"))
;; This file is NOT part of GNU Emacs.
@@ -2607,12 +2607,14 @@ variable at point, if any."
(message "Buffer %s is no longer availabe." bn)))
(user-error "No top-level menu entry here")))
-(defvar-keymap sweeprolog-top-level-menu-mode-map
- :doc "Local keymap for `sweeprolog-top-level-menu-mode' buffers."
- "RET" #'sweeprolog-top-level-menu-go-to
- "k" #'sweeprolog-top-level-menu-kill
- "t" #'sweeprolog-top-level-menu-new
- "s" #'sweeprolog-top-level-menu-signal)
+(defvar sweeprolog-top-level-menu-mode-map
+ (let ((map (make-sparse-keymap)))
+ (define-key map (kbd "RET") #'sweeprolog-top-level-menu-go-to)
+ (define-key map (kbd "k") #'sweeprolog-top-level-menu-kill)
+ (define-key map (kbd "t") #'sweeprolog-top-level-menu-new)
+ (define-key map (kbd "s") #'sweeprolog-top-level-menu-signal)
+ map)
+ "Local keymap for `sweeprolog-top-level-menu-mode' buffers.")
(define-derived-mode sweeprolog-top-level-menu-mode
tabulated-list-mode "sweep Top-level Menu"