# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 715243623 0
# Node ID 19c6978ab21852029f5dde94b24532c3727d7d9f
# Parent  d9775f33488d5a05ec3a49bf763c52b3dac949cb
*** empty log message ***

diff -r d9775f33488d -r 19c6978ab218 lisp/mouse.el
--- a/lisp/mouse.el	Mon Aug 31 05:54:58 1992 +0000
+++ b/lisp/mouse.el	Mon Aug 31 06:47:03 1992 +0000
@@ -509,17 +509,17 @@
 (defvar help-modes-map '(keymap "Modes"))
 (defvar help-admin-map '(keymap "Administrivia"))
 
-(define-key help-menu-map "a"
+(define-key help-menu-map [apropos]
   (cons "Is there a command that..." help-apropos-map))
-(define-key help-menu-map "k"
+(define-key help-menu-map [keys]
   (cons "Key Commands <==> Functions" help-keys-map))
-(define-key help-menu-map "m"
+(define-key help-menu-map [manuals]
   (cons "Manual and tutorial" help-manual-map))
-(define-key help-menu-map "x"
+(define-key help-menu-map [misc]
   (cons "Odds and ends" help-misc-map))
-(define-key help-menu-map "M"
+(define-key help-menu-map [modes]
   (cons "Modes" help-modes-map))
-(define-key help-menu-map "z"
+(define-key help-menu-map [admin]
   (cons "Administrivia" help-admin-map))
 
 (define-key help-apropos-map "c" '("Command Apropos" . command-apropos))