branch: externals/debbugs
commit 21dd4463d0865e65c6ca429ffc9d1ad918a8a27d
Author: Michael Albinus <[email protected]>
Commit: Michael Albinus <[email protected]>
Fix bug#38551 in debbugs
* debbugs-gnu.el (debbugs-gnu-mode-map)
(debbugs-gnu-usertags-mode-map): Use (kbd "RET") instead of [return].
(debbugs-gnu-mode): Use #' read syntax.
---
debbugs-gnu.el | 6 +++---
1 file changed, 3 insertions(+), 3 deletions(-)
diff --git a/debbugs-gnu.el b/debbugs-gnu.el
index 5789d80..13a3274 100644
--- a/debbugs-gnu.el
+++ b/debbugs-gnu.el
@@ -987,7 +987,7 @@ Used instead of `tabulated-list-print-entry'."
(let ((map (make-sparse-keymap))
(menu-map (make-sparse-keymap)))
(set-keymap-parent map tabulated-list-mode-map)
- (define-key map [return] #'debbugs-gnu-select-report)
+ (define-key map (kbd "RET") #'debbugs-gnu-select-report)
(define-key map [mouse-2] #'debbugs-gnu-select-report)
(define-key map "A" #'debbugs-gnu-select-current-bugs)
(define-key map "g" #'debbugs-gnu-rescan)
@@ -1090,7 +1090,7 @@ Interactively, it is non-nil with the prefix argument."
("Submitter" 25 debbugs-gnu-sort-submitter)
("Title" 10 debbugs-gnu-sort-title)])
(setq tabulated-list-sort-key (cons "Id" nil))
- (setq tabulated-list-printer 'debbugs-gnu-print-entry)
+ (setq tabulated-list-printer #'debbugs-gnu-print-entry)
(buffer-disable-undo)
(setq truncate-lines t)
(setq buffer-read-only t))
@@ -2163,7 +2163,7 @@ successfully sent."
(defvar debbugs-gnu-usertags-mode-map
(let ((map (make-sparse-keymap)))
(set-keymap-parent map tabulated-list-mode-map)
- (define-key map [return] #'debbugs-gnu-select-usertag)
+ (define-key map (kbd "RET") #'debbugs-gnu-select-usertag)
(define-key map [mouse-2] #'debbugs-gnu-select-usertag)
map))
