* xmenu.c (syms_of_xmenu): Make accelerate-menu an alias for

 menu-bar-open.

2 files changed, 7 insertions, 0 deletions

diff --git a/src/ChangeLog b/src/ChangeLog
index fc6b3cd48e7..78ce1234a32 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,5 +1,10 @@
 2006-06-01  Jan Dj,Ad(Brv  <jan.h.d@swipnet.se>
 
+        * xmenu.c (syms_of_xmenu): Make accelerate-menu an alias for
+        menu-bar-open.
+
+2006-06-01  Jan Dj,Ad(Brv  <jan.h.d@swipnet.se>
+
         * xmenu.c (Fmenu_bar_open, syms_of_xmenu): Change menu-bar-start to
         menu-bar-open.
 
diff --git a/src/xmenu.c b/src/xmenu.c
index f2b5f9f0c07..5a71d82a424 100644
--- a/src/xmenu.c
+++ b/src/xmenu.c
@@ -3772,6 +3772,8 @@ The enable predicate for a menu command should check this variable.  */);
 
 #if defined (USE_GTK) || defined (USE_X_TOOLKIT)
   defsubr (&Smenu_bar_open);
+  Fdefalias (intern ("accelerate-menu"), intern (Smenu_bar_open.symbol_name),
+             Qnil);
 #endif
 
 #ifdef HAVE_MENUS