# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 797831470 0
# Node ID efaaecd960aee957b34fec4854fca4150237fc5b
# Parent  5f5dda37c82c7200a9f7cda9aa3680ec7eba4dc6
(update_one_menu_entry, make_menu_in_widget):
Specify more useful names in XmCreatePulldownMenu calls.

diff -r 5f5dda37c82c -r efaaecd960ae lwlib/lwlib-Xm.c
--- a/lwlib/lwlib-Xm.c	Fri Apr 14 02:10:52 1995 +0000
+++ b/lwlib/lwlib-Xm.c	Fri Apr 14 03:51:10 1995 +0000
@@ -401,7 +401,7 @@
 	}
       else
 	{
-	  menu = XmCreatePulldownMenu (widget, "pulldown", NULL, 0);
+	  menu = XmCreatePulldownMenu (widget, cur->name, NULL, 0);
 	  make_menu_in_widget (instance, menu, cur->contents);
 	  XtSetArg (al [ac], XmNsubMenuId, menu); ac++;
 	  button = XmCreateCascadeButton (widget, cur->name, al, ac);
@@ -467,7 +467,7 @@
     {
       if (contents)
 	{
-	  menu = XmCreatePulldownMenu (XtParent (widget), "pulldown", NULL, 0);
+	  menu = XmCreatePulldownMenu (XtParent (widget), XtName (widget), NULL, 0);
 	  make_menu_in_widget (instance, menu, contents);
 	  ac = 0;
 	  XtSetArg (al [ac], XmNsubMenuId, menu); ac++;