diff options
| author | Paul Reilly | 1994-11-08 13:06:07 +0000 |
|---|---|---|
| committer | Paul Reilly | 1994-11-08 13:06:07 +0000 |
| commit | ffa47e5469f72325bb9f6f83fc00e552bca31254 (patch) | |
| tree | d1c553507d31ccdac2f7a646011c8547dbb29899 | |
| parent | 2d73167a553d6b7c689a714c6351052f6fec19cf (diff) | |
| download | emacs-ffa47e5469f72325bb9f6f83fc00e552bca31254.tar.gz emacs-ffa47e5469f72325bb9f6f83fc00e552bca31254.zip | |
(make_menu_in_widget): Differentiate a separator entry ("--") from a
title.
(xm_pop_down_callback): Filter all but the last pop down callbacks.
| -rw-r--r-- | lwlib/lwlib-Xm.c | 8 |
1 files changed, 6 insertions, 2 deletions
diff --git a/lwlib/lwlib-Xm.c b/lwlib/lwlib-Xm.c index 099f5837627..2cb6b9b2a18 100644 --- a/lwlib/lwlib-Xm.c +++ b/lwlib/lwlib-Xm.c | |||
| @@ -345,7 +345,8 @@ make_menu_in_widget (widget_instance* instance, Widget widget, | |||
| 345 | XtSetArg (al [ac], XmNalignment, XmALIGNMENT_BEGINNING); ac++; | 345 | XtSetArg (al [ac], XmNalignment, XmALIGNMENT_BEGINNING); ac++; |
| 346 | XtSetArg (al [ac], XmNuserData, cur->call_data); ac++; | 346 | XtSetArg (al [ac], XmNuserData, cur->call_data); ac++; |
| 347 | 347 | ||
| 348 | if (instance->pop_up_p && !cur->contents && !cur->call_data) | 348 | if (instance->pop_up_p && !cur->contents && !cur->call_data |
| 349 | && !all_dashes_p (cur->name)) | ||
| 349 | { | 350 | { |
| 350 | ac = 0; | 351 | ac = 0; |
| 351 | XtSetArg (al[ac], XmNalignment, XmALIGNMENT_CENTER); ac++; | 352 | XtSetArg (al[ac], XmNalignment, XmALIGNMENT_CENTER); ac++; |
| @@ -1510,7 +1511,10 @@ xm_pull_down_callback (Widget widget, XtPointer closure, XtPointer call_data) | |||
| 1510 | static void | 1511 | static void |
| 1511 | xm_pop_down_callback (Widget widget, XtPointer closure, XtPointer call_data) | 1512 | xm_pop_down_callback (Widget widget, XtPointer closure, XtPointer call_data) |
| 1512 | { | 1513 | { |
| 1513 | do_call (widget, closure, post_activate); | 1514 | widget_instance *instance = (widget_instance *) closure; |
| 1515 | |||
| 1516 | if (!instance->pop_up_p || (XtParent (widget) == instance->parent)) | ||
| 1517 | do_call (widget, closure, post_activate); | ||
| 1514 | } | 1518 | } |
| 1515 | 1519 | ||
| 1516 | 1520 | ||