From: Richard M. Stallman <rms@gnu.org>
Date: Mon, 10 Jun 1996 17:31:25 +0000 (+0000)
Subject: (make_menu_in_widget): Set mapping delay
X-Git-Tag: emacs-19.34~487
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=5efe98b7b6a5604456e523b1a573b94465537541;p=emacs.git

(make_menu_in_widget): Set mapping delay
for cascade buttons to zero.
---

diff --git a/lwlib/lwlib-Xm.c b/lwlib/lwlib-Xm.c
index 6d1e76f960e..57e4b4a2ca5 100644
--- a/lwlib/lwlib-Xm.c
+++ b/lwlib/lwlib-Xm.c
@@ -440,7 +440,10 @@ make_menu_in_widget (instance, widget, val, keep_first_children)
 	{
 	  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);