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).

diff --git a/lisp/gnus/gnus-group.el b/lisp/gnus/gnus-group.el
index 2a4c84c94b0ab9b355f5ff447c2184e935d367c8..ddc819877c133e186b4beb6c2df95aa2ead84d03 100644 (file)
--- 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