From f1e82b8d4155159f7224d286cc578923774736ed Mon Sep 17 00:00:00 2001 From: hobbs Date: Sun, 12 Dec 1999 22:51:22 +0000 Subject: * generic/tkText.c: fixed bug in TextSearchCmd for multibyte chars (Darley) [Bug: 3839] --- generic/tkText.c | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/generic/tkText.c b/generic/tkText.c index 623ae93..65ff1d1 100644 --- a/generic/tkText.c +++ b/generic/tkText.c @@ -14,7 +14,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tkText.c,v 1.7 1999/04/21 21:53:28 rjohnson Exp $ + * RCS: @(#) $Id: tkText.c,v 1.8 1999/12/12 22:51:22 hobbs Exp $ */ #include "default.h" @@ -1797,7 +1797,7 @@ TextSearchCmd(textPtr, interp, argc, argv) } matchByte = i; matchLength = thisLength; - firstByte += Tcl_UtfToUniChar(startOfLine + matchByte, &ch); + firstByte = i + Tcl_UtfToUniChar(startOfLine + matchByte, &ch); } while (backwards); /* -- cgit v0.12