Mercurial > emacs
comparison src/xterm.c @ 63103:e37d71ba7c6e
(x_create_toolkit_scroll_bar): Use XtNarrowScrollbars if available.
| author | Stefan Monnier <monnier@iro.umontreal.ca> |
|---|---|
| date | Mon, 06 Jun 2005 21:27:50 +0000 |
| parents | c79b5010b654 |
| children | bb26dfdf2698 e58cb448e07c 173dee4e2611 |
comparison
equal
deleted
inserted
replaced
| 63102:608496528c29 | 63103:e37d71ba7c6e |
|---|---|
| 4587 | 4587 |
| 4588 { | 4588 { |
| 4589 char *initial = ""; | 4589 char *initial = ""; |
| 4590 char *val = initial; | 4590 char *val = initial; |
| 4591 XtVaGetValues (widget, XtNscrollVCursor, (XtPointer) &val, | 4591 XtVaGetValues (widget, XtNscrollVCursor, (XtPointer) &val, |
| 4592 #ifdef XtNarrowScrollbars | |
| 4593 XtNarrowScrollbars, (XtPointer) &xaw3d_arrow_scroll, | |
| 4594 #endif | |
| 4592 XtNpickTop, (XtPointer) &xaw3d_pick_top, NULL); | 4595 XtNpickTop, (XtPointer) &xaw3d_pick_top, NULL); |
| 4593 if (val == initial) | 4596 if (xaw3d_arrow_scroll || val == initial) |
| 4594 { /* ARROW_SCROLL */ | 4597 { /* ARROW_SCROLL */ |
| 4595 xaw3d_arrow_scroll = True; | 4598 xaw3d_arrow_scroll = True; |
| 4596 /* Isn't that just a personal preference ? -sm */ | 4599 /* Isn't that just a personal preference ? --Stef */ |
| 4597 XtVaSetValues (widget, XtNcursorName, "top_left_arrow", NULL); | 4600 XtVaSetValues (widget, XtNcursorName, "top_left_arrow", NULL); |
| 4598 } | 4601 } |
| 4599 } | 4602 } |
| 4600 | 4603 |
| 4601 /* Define callbacks. */ | 4604 /* Define callbacks. */ |