From 13162c0e6b8bd645f74de20a4e49203ed9afaba6 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Sat, 19 Mar 1994 07:16:54 +0000 Subject: [PATCH] *** empty log message *** --- lwlib/lwlib-Xaw.c | 23 ++++++++++++++--------- 1 file changed, 14 insertions(+), 9 deletions(-) diff --git a/lwlib/lwlib-Xaw.c b/lwlib/lwlib-Xaw.c index 90aa782be8..76628ab8a0 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); } -- 2.20.1