emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] master 938b765: Fix bug#38551 in debbugs


From: Michael Albinus
Subject: [elpa] master 938b765: Fix bug#38551 in debbugs
Date: Tue, 10 Dec 2019 05:14:14 -0500 (EST)

branch: master
commit 938b765d7ef1bd768830ef3ab8ec10ab039fe8cb
Author: Michael Albinus <address@hidden>
Commit: Michael Albinus <address@hidden>

    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.
---
 packages/debbugs/debbugs-gnu.el | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/packages/debbugs/debbugs-gnu.el b/packages/debbugs/debbugs-gnu.el
index 5789d80..13a3274 100644
--- a/packages/debbugs/debbugs-gnu.el
+++ b/packages/debbugs/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))
 



reply via email to

[Prev in Thread] Current Thread [Next in Thread]