diff options
| author | Paul Reilly <pmr@pajato.com> | 1994-09-16 18:39:54 +0000 |
|---|---|---|
| committer | Paul Reilly <pmr@pajato.com> | 1994-09-16 18:39:54 +0000 |
| commit | a27ba57907b57769b053a22b9a48866b4f3c071d (patch) | |
| tree | e75b1435fb4819f7fe868c63e20c0c92ff98dff7 /lwlib | |
| parent | 25cad2df1c1d0e8bcfe9fc3f448266d297d431f7 (diff) | |
| download | emacs-a27ba57907b57769b053a22b9a48866b4f3c071d.tar.gz | |
entered into RCS
Diffstat (limited to 'lwlib')
| -rw-r--r-- | lwlib/lwlib-Xlw.c | 7 | ||||
| -rw-r--r-- | lwlib/xlwmenu.h | 8 |
2 files changed, 13 insertions, 2 deletions
diff --git a/lwlib/lwlib-Xlw.c b/lwlib/lwlib-Xlw.c index 61b2d5b0562..3c0bd308699 100644 --- a/lwlib/lwlib-Xlw.c +++ b/lwlib/lwlib-Xlw.c @@ -77,10 +77,15 @@ xlw_create_menubar (instance) widget_instance* instance; { Widget widget; - Arg al[1]; + Arg al[5]; int ac = 0; XtSetArg (al[ac], XtNmenu, instance->info->val); ac++; +#ifdef emacs + XtSetArg (al[ac], XtNshowGrip, 0); ac++; + XtSetArg (al[ac], XtNresizeToPreferred, 1); ac++; + XtSetArg (al[ac], XtNallowResize, 1); ac++; +#endif /* This used to use XtVaCreateWidget, but an old Xt version has a bug in XtVaCreateWidget that frees instance->info->name. */ diff --git a/lwlib/xlwmenu.h b/lwlib/xlwmenu.h index e8d3c93778f..949fbf76589 100644 --- a/lwlib/xlwmenu.h +++ b/lwlib/xlwmenu.h @@ -25,6 +25,12 @@ #define XtCHorizontal "Horizontal" #define XtNcursor "cursor" #define XtNCursor "Cursor" +#define XtNshowGrip "showGrip" +#define XtCShowGrip "ShowGrip" +#define XtNresizeToPreferred "resizeToPreferred" +#define XtCResizeToPreferred "ResizeToPreferred" +#define XtNallowResize "allowResize" +#define XtCAllowResize "AllowResize" /* Motif-compatible resource names */ #define XmNshadowThickness "shadowThickness" @@ -45,6 +51,6 @@ typedef struct _XlwMenuClassRec *XlwMenuWidgetClass; extern WidgetClass xlwMenuWidgetClass; void -pop_up_menu (XlwMenuWidget mw, XButtonPressedEvent* event); +pop_up_menu (); #endif /* _XlwMenu_h */ |