aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--lwlib/lwlib-Xaw.c23
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)
118 widget_value *val; 118 widget_value *val;
119 Boolean deep_p; 119 Boolean deep_p;
120{ 120{
121#if 0
121 if (XtIsSubclass (widget, scrollbarWidgetClass)) 122 if (XtIsSubclass (widget, scrollbarWidgetClass))
122 { 123 {
123 xaw_update_scrollbar (instance, widget, val); 124 xaw_update_scrollbar (instance, widget, val);
124 } 125 }
125 else if (XtIsSubclass (widget, dialogWidgetClass)) 126#endif
127 if (XtIsSubclass (widget, dialogWidgetClass))
126 { 128 {
127 Arg al[1]; 129 Arg al[1];
128 int ac = 0; 130 int ac = 0;
@@ -132,6 +134,8 @@ xaw_update_one_widget (instance, widget, val, deep_p)
132 else if (XtIsSubclass (widget, commandWidgetClass)) 134 else if (XtIsSubclass (widget, commandWidgetClass))
133 { 135 {
134 Dimension bw = 0; 136 Dimension bw = 0;
137 Arg al[3];
138
135 XtVaGetValues (widget, XtNborderWidth, &bw, 0); 139 XtVaGetValues (widget, XtNborderWidth, &bw, 0);
136 if (bw == 0) 140 if (bw == 0)
137 /* Don't let buttons end up with 0 borderwidth, that's ugly... 141 /* 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)
140 that I don't feel like opening right now. Making Athena widgets 144 that I don't feel like opening right now. Making Athena widgets
141 not look like shit is just entirely too much work. 145 not look like shit is just entirely too much work.
142 */ 146 */
143 XtVaSetValues (widget, XtNborderWidth, 1, 0); 147 {
144 148 XtSetArg (al[0], XtNborderWidth, 1);
145 XtVaSetValues (widget, 149 XtSetValues (widget, al, 1);
146 XtNlabel, val->value, 150 }
147 XtNsensitive, val->enabled,
148 /* Force centered button text. Se above. */
149 XtNjustify, XtJustifyCenter,
150 0);
151 151
152 XtSetArg (al[0], XtNlabel, val->value);
153 XtSetArg (al[1], XtNsensitive, val->enabled);
154 /* Force centered button text. Se above. */
155 XtSetArg (al[2], XtNjustify, XtJustifyCenter);
156 XtSetValues (widget, al, 3);
152 XtRemoveAllCallbacks (widget, XtNcallback); 157 XtRemoveAllCallbacks (widget, XtNcallback);
153 XtAddCallback (widget, XtNcallback, xaw_generic_callback, instance); 158 XtAddCallback (widget, XtNcallback, xaw_generic_callback, instance);
154 } 159 }