emacs-diffs
[Top][All Lists]
Advanced

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

master a1477eb: Fix more Gnus group key bindings recently changed


From: Lars Ingebrigtsen
Subject: master a1477eb: Fix more Gnus group key bindings recently changed
Date: Tue, 12 Oct 2021 08:27:46 -0400 (EDT)

branch: master
commit a1477ebb0c849a2beadca94620766a7ba5a1350a
Author: Lars Ingebrigtsen <larsi@gnus.org>
Commit: Lars Ingebrigtsen <larsi@gnus.org>

    Fix more Gnus group key bindings recently changed
    
    * lisp/gnus/gnus-group.el (:keymap): Fix some prefix keys that
    ended up in the wrong place during the keymap rewrite (bug#51136).
---
 lisp/gnus/gnus-group.el | 42 +++++++++++++++++++++---------------------
 1 file changed, 21 insertions(+), 21 deletions(-)

diff --git a/lisp/gnus/gnus-group.el b/lisp/gnus/gnus-group.el
index 2a4c84c..ddc8198 100644
--- a/lisp/gnus/gnus-group.el
+++ b/lisp/gnus/gnus-group.el
@@ -683,27 +683,27 @@ simple manner."
         "z" #'gnus-group-compact-group
         "x" #'gnus-group-expunge-group
         "\177" #'gnus-group-delete-group
-        [delete] #'gnus-group-delete-group)
-
-  "S" (define-keymap :prefix 'gnus-group-sort-map
-        "s" #'gnus-group-sort-groups
-        "a" #'gnus-group-sort-groups-by-alphabet
-        "u" #'gnus-group-sort-groups-by-unread
-        "l" #'gnus-group-sort-groups-by-level
-        "v" #'gnus-group-sort-groups-by-score
-        "r" #'gnus-group-sort-groups-by-rank
-        "m" #'gnus-group-sort-groups-by-method
-        "n" #'gnus-group-sort-groups-by-real-name)
-
-  "P" (define-keymap :prefix 'gnus-group-sort-selected-map
-        "s" #'gnus-group-sort-selected-groups
-        "a" #'gnus-group-sort-selected-groups-by-alphabet
-        "u" #'gnus-group-sort-selected-groups-by-unread
-        "l" #'gnus-group-sort-selected-groups-by-level
-        "v" #'gnus-group-sort-selected-groups-by-score
-        "r" #'gnus-group-sort-selected-groups-by-rank
-        "m" #'gnus-group-sort-selected-groups-by-method
-        "n" #'gnus-group-sort-selected-groups-by-real-name)
+        [delete] #'gnus-group-delete-group
+
+        "S" (define-keymap :prefix 'gnus-group-sort-map
+              "s" #'gnus-group-sort-groups
+              "a" #'gnus-group-sort-groups-by-alphabet
+              "u" #'gnus-group-sort-groups-by-unread
+              "l" #'gnus-group-sort-groups-by-level
+              "v" #'gnus-group-sort-groups-by-score
+              "r" #'gnus-group-sort-groups-by-rank
+              "m" #'gnus-group-sort-groups-by-method
+              "n" #'gnus-group-sort-groups-by-real-name)
+
+        "P" (define-keymap :prefix 'gnus-group-sort-selected-map
+              "s" #'gnus-group-sort-selected-groups
+              "a" #'gnus-group-sort-selected-groups-by-alphabet
+              "u" #'gnus-group-sort-selected-groups-by-unread
+              "l" #'gnus-group-sort-selected-groups-by-level
+              "v" #'gnus-group-sort-selected-groups-by-score
+              "r" #'gnus-group-sort-selected-groups-by-rank
+              "m" #'gnus-group-sort-selected-groups-by-method
+              "n" #'gnus-group-sort-selected-groups-by-real-name))
 
   "A" (define-keymap :prefix 'gnus-group-list-map
         "k" #'gnus-group-list-killed



reply via email to

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