# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 834427885 0
# Node ID 1beabd8b78a116dd6dae204e41489bffe3940765
# Parent  6b1faae68eba96ea4d390eb5ea33dc1c029bd2bd
(make_menu_in_widget): Set mapping delay
for cascade buttons to zero.

diff -r 6b1faae68eba -r 1beabd8b78a1 lwlib/lwlib-Xm.c
--- a/lwlib/lwlib-Xm.c	Mon Jun 10 17:30:50 1996 +0000
+++ b/lwlib/lwlib-Xm.c	Mon Jun 10 17:31:25 1996 +0000
@@ -440,7 +440,10 @@
 	{
 	  menu = XmCreatePulldownMenu (widget, cur->name, NULL, 0);
 	  make_menu_in_widget (instance, menu, cur->contents, 0);
-	  XtSetArg (al [ac], XmNsubMenuId, menu); ac++;
+          XtSetArg (al [ac], XmNsubMenuId, menu); ac++;
+          /* non-zero values don't work reliably in
+             conjunction with Emacs' event loop */
+          XtSetArg (al [ac], XmNmappingDelay, 0); ac++;
 	  button = XmCreateCascadeButtonGadget (widget, cur->name, al, ac);
 
 	  xm_update_label (instance, button, cur);