From: Paul Reilly <pmr@pajato.com>
Date: Mon, 7 Nov 1994 07:31:19 +0000 (+0000)
Subject: (update_one_menu_entry): Use the parent of the cascade button as the
X-Git-Tag: emacs-19.34~6030
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=17eab85c8d8787455e32e8cbf8132d8511c4b20e;p=emacs.git

(update_one_menu_entry): Use the parent of the cascade button as the
parent of the pulldown, rather than the cascade button itself.  This
works around a Motif SIGSEGV in the function `InSharedMenuHierarchy'.
---

diff --git a/lwlib/lwlib-Xm.c b/lwlib/lwlib-Xm.c
index 7444d3634dc..099f5837627 100644
--- a/lwlib/lwlib-Xm.c
+++ b/lwlib/lwlib-Xm.c
@@ -436,7 +436,7 @@ update_one_menu_entry (widget_instance* instance, Widget widget,
     {
       if (contents)
 	{
-	  menu = XmCreatePulldownMenu (widget, "pulldown", NULL, 0);
+	  menu = XmCreatePulldownMenu (XtParent (widget), "pulldown", NULL, 0);
 	  make_menu_in_widget (instance, menu, contents);
 	  ac = 0;
 	  XtSetArg (al [ac], XmNsubMenuId, menu); ac++;