1 files changed, 17 insertions, 17 deletions
diff --git a/lisp/gnus/gnus-srvr.el b/lisp/gnus/gnus-srvr.el
index f2ffb067b8e..fa880b7eddb 100644
--- a/lisp/gnus/gnus-srvr.el
+++ b/lisp/gnus/gnus-srvr.el
@@ -105,9 +105,9 @@ If nil, a faster, but more primitive, buffer is used instead."
 
 (defvar-keymap gnus-server-mode-map
   :full t :suppress t
-  " " #'gnus-server-read-server-in-server-buffer
-  "\r" #'gnus-server-read-server
-  [mouse-2] #'gnus-server-pick-server
+  "SPC" #'gnus-server-read-server-in-server-buffer
+  "RET" #'gnus-server-read-server
+  "<mouse-2>" #'gnus-server-pick-server
   "q" #'gnus-server-exit
   "l" #'gnus-server-list-servers
   "k" #'gnus-server-kill-server
@@ -119,9 +119,9 @@ If nil, a faster, but more primitive, buffer is used instead."
   "s" #'gnus-server-scan-server
 
   "O" #'gnus-server-open-server
-  "\M-o" #'gnus-server-open-all-servers
+  "M-o" #'gnus-server-open-all-servers
   "C" #'gnus-server-close-server
-  "\M-c" #'gnus-server-close-all-servers
+  "M-c" #'gnus-server-close-all-servers
   "D" #'gnus-server-deny-server
   "L" #'gnus-server-offline-server
   "R" #'gnus-server-remove-denials
@@ -138,8 +138,8 @@ If nil, a faster, but more primitive, buffer is used instead."
   "i" #'gnus-server-toggle-cloud-server
   "I" #'gnus-server-set-cloud-method-server
 
-  "\C-c\C-i" #'gnus-info-find-node
-  "\C-c\C-b" #'gnus-bug)
+  "C-c C-i" #'gnus-info-find-node
+  "C-c C-b" #'gnus-bug)
 
 (defcustom gnus-server-menu-hook nil
   "Hook run after the creation of the server mode menu."
@@ -694,29 +694,29 @@ claim them."
 
 (defvar-keymap gnus-browse-mode-map
   :full t :suppress t
-  " " #'gnus-browse-read-group
+  "SPC" #'gnus-browse-read-group
   "=" #'gnus-browse-select-group
   "n" #'gnus-browse-next-group
   "p" #'gnus-browse-prev-group
-  "\177" #'gnus-browse-prev-group
-  [delete] #'gnus-browse-prev-group
+  "DEL" #'gnus-browse-prev-group
+  "<delete>" #'gnus-browse-prev-group
   "N" #'gnus-browse-next-group
   "P" #'gnus-browse-prev-group
-  "\M-n" #'gnus-browse-next-group
-  "\M-p" #'gnus-browse-prev-group
-  "\r" #'gnus-browse-select-group
+  "M-n" #'gnus-browse-next-group
+  "M-p" #'gnus-browse-prev-group
+  "RET" #'gnus-browse-select-group
   "u" #'gnus-browse-toggle-subscription-at-point
   "l" #'gnus-browse-exit
   "L" #'gnus-browse-exit
   "q" #'gnus-browse-exit
   "Q" #'gnus-browse-exit
   "d" #'gnus-browse-describe-group
-  [delete] #'gnus-browse-delete-group
-  "\C-c\C-c" #'gnus-browse-exit
+  "<delete>" #'gnus-browse-delete-group
+  "C-c C-c" #'gnus-browse-exit
   "?" #'gnus-browse-describe-briefly
 
-  "\C-c\C-i" #'gnus-info-find-node
-  "\C-c\C-b" #'gnus-bug)
+  "C-c C-i" #'gnus-info-find-node
+  "C-c C-b" #'gnus-bug)
 
 (defun gnus-browse-make-menu-bar ()
   (gnus-turn-off-edit-menu 'browse)