comparison src/xterm.c @ 90192:173dee4e2611

Revision: miles@gnu.org--gnu-2005/emacs--unicode--0--patch-61 Merge from emacs--cvs-trunk--0 Patches applied: * emacs--cvs-trunk--0 (patch 353-357) - Update from CVS
author Miles Bader <miles@gnu.org>
date Thu, 09 Jun 2005 07:13:03 +0000
parents 01137c1fdbe9 e37d71ba7c6e
children f9a65d7ebd29
comparison
equal deleted inserted replaced
90191:c766b49f5bbd 90192:173dee4e2611
4593 4593
4594 { 4594 {
4595 char *initial = ""; 4595 char *initial = "";
4596 char *val = initial; 4596 char *val = initial;
4597 XtVaGetValues (widget, XtNscrollVCursor, (XtPointer) &val, 4597 XtVaGetValues (widget, XtNscrollVCursor, (XtPointer) &val,
4598 #ifdef XtNarrowScrollbars
4599 XtNarrowScrollbars, (XtPointer) &xaw3d_arrow_scroll,
4600 #endif
4598 XtNpickTop, (XtPointer) &xaw3d_pick_top, NULL); 4601 XtNpickTop, (XtPointer) &xaw3d_pick_top, NULL);
4599 if (val == initial) 4602 if (xaw3d_arrow_scroll || val == initial)
4600 { /* ARROW_SCROLL */ 4603 { /* ARROW_SCROLL */
4601 xaw3d_arrow_scroll = True; 4604 xaw3d_arrow_scroll = True;
4602 /* Isn't that just a personal preference ? -sm */ 4605 /* Isn't that just a personal preference ? --Stef */
4603 XtVaSetValues (widget, XtNcursorName, "top_left_arrow", NULL); 4606 XtVaSetValues (widget, XtNcursorName, "top_left_arrow", NULL);
4604 } 4607 }
4605 } 4608 }
4606 4609
4607 /* Define callbacks. */ 4610 /* Define callbacks. */