X-Git-Url: http://winboard.nl/cgi-bin?a=blobdiff_plain;f=xaw%2Fxhistory.c;h=805c1f3907bb8b6e6b063bda1184b153fa2bfc7c;hb=3a75b74c7fc03b543993c90f4a9ebdea9f03b759;hp=51ebf5cf555ccbb198c108d2cb62e2b099843344;hpb=8a0368b7169965529802961fbd16fdfacf3c639d;p=xboard.git diff --git a/xaw/xhistory.c b/xaw/xhistory.c index 51ebf5c..805c1f3 100644 --- a/xaw/xhistory.c +++ b/xaw/xhistory.c @@ -71,33 +71,26 @@ extern Option historyOptions[]; // ------------- low-level front-end actions called by MoveHistory back-end ----------------- -void -HighlightMove (int from, int to, Boolean highlight) -{ - if(highlight) - XawTextSetSelection( historyOptions[0].handle, from, to ); // for lack of a better method, use selection for highighting -} - // the bold argument says 0 = normal, 1 = bold typeface // the colorNr argument says 0 = font-default, 1 = gray void -ScrollToCurrent (int caretPos) +ScrollToCursor (Option *opt, int caretPos) { Arg args[10]; char *s; int len; - GetWidgetText(&historyOptions[0], &s); + GetWidgetText(opt, &s); len = strlen(s); if(caretPos < 0 || caretPos > len) caretPos = len; if(caretPos > len-30) { // scroll to end, which causes no flicker static XEvent event; - XtCallActionProc(historyOptions[0].handle, "end-of-file", &event, NULL, 0); + XtCallActionProc(opt->handle, "end-of-file", &event, NULL, 0); return; } // the following leads to a very annoying flicker, even when no scrolling is done at all. XtSetArg(args[0], XtNinsertPosition, caretPos); // this triggers scrolling in Xaw XtSetArg(args[1], XtNdisplayCaret, False); - XtSetValues(historyOptions[0].handle, args, 2); + XtSetValues(opt->handle, args, 2); }