1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-30 04:10:54 -08:00

(make_menu_in_widget): Differentiate a separator entry ("--") from a

title.
(xm_pop_down_callback): Filter all but the last pop down callbacks.
This commit is contained in:
Paul Reilly 1994-11-08 13:06:07 +00:00
parent 2d73167a55
commit ffa47e5469

View file

@ -345,7 +345,8 @@ make_menu_in_widget (widget_instance* instance, Widget widget,
XtSetArg (al [ac], XmNalignment, XmALIGNMENT_BEGINNING); ac++;
XtSetArg (al [ac], XmNuserData, cur->call_data); ac++;
if (instance->pop_up_p && !cur->contents && !cur->call_data)
if (instance->pop_up_p && !cur->contents && !cur->call_data
&& !all_dashes_p (cur->name))
{
ac = 0;
XtSetArg (al[ac], XmNalignment, XmALIGNMENT_CENTER); ac++;
@ -1510,7 +1511,10 @@ xm_pull_down_callback (Widget widget, XtPointer closure, XtPointer call_data)
static void
xm_pop_down_callback (Widget widget, XtPointer closure, XtPointer call_data)
{
do_call (widget, closure, post_activate);
widget_instance *instance = (widget_instance *) closure;
if (!instance->pop_up_p || (XtParent (widget) == instance->parent))
do_call (widget, closure, post_activate);
}