# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 838938336 0
# Node ID e1e9df8a862ec258f5eeeecb8982ed128790696a
# Parent  65dd474f666e83bd09299fa0e99e7cc132be45fc
(make_menubar): Turn off menu accelerator.

diff -r 65dd474f666e -r e1e9df8a862e lwlib/lwlib-Xm.c
--- a/lwlib/lwlib-Xm.c	Thu Aug 01 22:25:11 1996 +0000
+++ b/lwlib/lwlib-Xm.c	Thu Aug 01 22:25:36 1996 +0000
@@ -1267,11 +1267,19 @@
   return widget;
 }
 
+/* Create a menu bar.  We turn off the f10 key
+   because we have not yet managed to make it work right in Motif.  */
+
 static Widget
 make_menubar (instance)
      widget_instance* instance;
 {
-  return XmCreateMenuBar (instance->parent, instance->info->name, NULL, 0);
+  Arg al[1];
+  int ac;
+
+  ac = 0;
+  XtSetArg(al[0], XmNmenuAccelerator, 0);
+  return XmCreateMenuBar (instance->parent, instance->info->name, al, 1);
 }
 
 static void