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:
parent
2d73167a55
commit
ffa47e5469
1 changed files with 6 additions and 2 deletions
|
|
@ -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);
|
||||
}
|
||||
|
||||
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue