Mercurial > hg > xemacs-beta

comparison lwlib/lwlib-Xaw.c @ 82:6a378aca36af r20-0b91

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-0b91
author cvs
date Mon, 13 Aug 2007 09:07:36 +0200
parents 1ce6082ce73f
children 6b37e6ddd302
comparison
equal deleted inserted replaced
81:ebca3d831cea 82:6a378aca36af
126 } 126 }
127 else if (XtIsSubclass (widget, commandWidgetClass)) 127 else if (XtIsSubclass (widget, commandWidgetClass))
128 { 128 {
129 Dimension bw = 0; 129 Dimension bw = 0;
130 XtVaGetValues (widget, XtNborderWidth, &bw, 0); 130 XtVaGetValues (widget, XtNborderWidth, &bw, 0);
131
132 #ifndef LWLIB_DIALOGS_ATHENA3D
131 if (bw == 0) 133 if (bw == 0)
132 /* Don't let buttons end up with 0 borderwidth, that's ugly... 134 /* Don't let buttons end up with 0 borderwidth, that's ugly...
133 Yeah, all this should really be done through app-defaults files 135 Yeah, all this should really be done through app-defaults files
134 or fallback resources, but that's a whole different can of worms 136 or fallback resources, but that's a whole different can of worms
135 that I don't feel like opening right now. Making Athena widgets 137 that I don't feel like opening right now. Making Athena widgets
136 not look like shit is just entirely too much work. 138 not look like shit is just entirely too much work.
137 */ 139 */
138 XtVaSetValues (widget, XtNborderWidth, 1, 0); 140 XtVaSetValues (widget, XtNborderWidth, 1, 0);
141 #endif
139 142
140 XtVaSetValues (widget, 143 XtVaSetValues (widget,
141 XtNlabel, val->value, 144 XtNlabel, val->value,
142 XtNsensitive, val->enabled, 145 XtNsensitive, val->enabled,
143 /* Force centered button text. Se above. */ 146 /* Force centered button text. Se above. */
516 id = instance->info->id; 519 id = instance->info->id;
517 event_data.slider_value = (int) call_data; 520 event_data.slider_value = (int) call_data;
518 event_data.time = 0; 521 event_data.time = 0;
519 522
520 if ((int) call_data > 0) 523 if ((int) call_data > 0)
521 event_data.action = SCROLLBAR_PAGE_DOWN; 524 /* event_data.action = SCROLLBAR_PAGE_DOWN;*/
525 event_data.action = SCROLLBAR_LINE_DOWN;
522 else 526 else
523 event_data.action = SCROLLBAR_PAGE_UP; 527 /* event_data.action = SCROLLBAR_PAGE_UP;*/
528 event_data.action = SCROLLBAR_LINE_UP;
524 529
525 if (instance->info->pre_activate_cb) 530 if (instance->info->pre_activate_cb)
526 instance->info->pre_activate_cb (widget, id, (XtPointer) &event_data); 531 instance->info->pre_activate_cb (widget, id, (XtPointer) &event_data);
527 } 532 }
528 533