diff options
author | Richard M. Stallman <rms@gnu.org> | 1994-03-19 07:16:54 +0000 |
---|---|---|
committer | Richard M. Stallman <rms@gnu.org> | 1994-03-19 07:16:54 +0000 |
commit | 6c5bfb5d2b5306720946fa2d10690d8c362d0b45 (patch) | |
tree | f73c456de35a9132f0ec8322939373fdeb924a3c /lwlib/lwlib-Xaw.c | |
parent | ce81c47f866715cdd0c78566814542feca7f8c74 (diff) | |
download | emacs-6c5bfb5d2b5306720946fa2d10690d8c362d0b45.tar.gz |
*** empty log message ***
Diffstat (limited to 'lwlib/lwlib-Xaw.c')
-rw-r--r-- | lwlib/lwlib-Xaw.c | 23 |
1 files changed, 14 insertions, 9 deletions
diff --git a/lwlib/lwlib-Xaw.c b/lwlib/lwlib-Xaw.c index 90aa782be81..76628ab8a0c 100644 --- a/lwlib/lwlib-Xaw.c +++ b/lwlib/lwlib-Xaw.c @@ -118,11 +118,13 @@ xaw_update_one_widget (instance, widget, val, deep_p) widget_value *val; Boolean deep_p; { +#if 0 if (XtIsSubclass (widget, scrollbarWidgetClass)) { xaw_update_scrollbar (instance, widget, val); } - else if (XtIsSubclass (widget, dialogWidgetClass)) +#endif + if (XtIsSubclass (widget, dialogWidgetClass)) { Arg al[1]; int ac = 0; @@ -132,6 +134,8 @@ xaw_update_one_widget (instance, widget, val, deep_p) else if (XtIsSubclass (widget, commandWidgetClass)) { Dimension bw = 0; + Arg al[3]; + XtVaGetValues (widget, XtNborderWidth, &bw, 0); if (bw == 0) /* Don't let buttons end up with 0 borderwidth, that's ugly... @@ -140,15 +144,16 @@ xaw_update_one_widget (instance, widget, val, deep_p) that I don't feel like opening right now. Making Athena widgets not look like shit is just entirely too much work. */ - XtVaSetValues (widget, XtNborderWidth, 1, 0); - - XtVaSetValues (widget, - XtNlabel, val->value, - XtNsensitive, val->enabled, - /* Force centered button text. Se above. */ - XtNjustify, XtJustifyCenter, - 0); + { + XtSetArg (al[0], XtNborderWidth, 1); + XtSetValues (widget, al, 1); + } + XtSetArg (al[0], XtNlabel, val->value); + XtSetArg (al[1], XtNsensitive, val->enabled); + /* Force centered button text. Se above. */ + XtSetArg (al[2], XtNjustify, XtJustifyCenter); + XtSetValues (widget, al, 3); XtRemoveAllCallbacks (widget, XtNcallback); XtAddCallback (widget, XtNcallback, xaw_generic_callback, instance); } |