diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-05-19 20:13:03 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-05-19 20:13:03 (GMT) |
| commit | 5e2cf435c8008214b25114de4509a7facd345dbd (patch) | |
| tree | fde5fe1f34ccb3106bc209c58697c2996031e06d /generic | |
| parent | 5f29a0196dbc94ae23df0ff6d5d9b5d1ffbd7d7f (diff) | |
| download | tk-5e2cf435c8008214b25114de4509a7facd345dbd.zip tk-5e2cf435c8008214b25114de4509a7facd345dbd.tar.gz tk-5e2cf435c8008214b25114de4509a7facd345dbd.tar.bz2 | |
> ... >=
Diffstat (limited to 'generic')
| -rw-r--r-- | generic/tkUtil.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tkUtil.c b/generic/tkUtil.c index 172bf23..8d2f42e 100644 --- a/generic/tkUtil.c +++ b/generic/tkUtil.c @@ -1326,7 +1326,7 @@ TkUtfAtIndex( { int ch; const char *p = Tcl_UtfAtIndex(src, index); - if ((p > src) && (UCHAR(p[-1]) > 0xF0)) { + if ((p > src) && (UCHAR(p[-1]) >= 0xF0)) { return p + TkUtfToUniChar(p - 1, &ch); } return p; |