diff options
author | hobbs <hobbs> | 1999-12-12 22:51:22 (GMT) |
---|---|---|
committer | hobbs <hobbs> | 1999-12-12 22:51:22 (GMT) |
commit | f1e82b8d4155159f7224d286cc578923774736ed (patch) | |
tree | 08325d40bae2201eda46d704cba47c9373635316 | |
parent | b9f543325402c99a3beb5055db36819d139e27f9 (diff) | |
download | tk-f1e82b8d4155159f7224d286cc578923774736ed.zip tk-f1e82b8d4155159f7224d286cc578923774736ed.tar.gz tk-f1e82b8d4155159f7224d286cc578923774736ed.tar.bz2 |
* generic/tkText.c: fixed bug in TextSearchCmd for multibyte chars
(Darley) [Bug: 3839]
-rw-r--r-- | generic/tkText.c | 4 |
1 files 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); /* |