diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2016-09-29 12:38:54 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2016-09-29 12:38:54 (GMT) |
commit | 5020e5e41bb04e9bde15b10902c3dd8edcf0b1eb (patch) | |
tree | 27b23d9828d8e560c051b9ff8b3130101c014b23 /generic/tkText.c | |
parent | 5ae24215a70e8cd5bdbd14ad619bd4230bd22f9a (diff) | |
parent | 4c158f250ca869188d30dcf7628676f0b0de236f (diff) | |
download | tk-5020e5e41bb04e9bde15b10902c3dd8edcf0b1eb.zip tk-5020e5e41bb04e9bde15b10902c3dd8edcf0b1eb.tar.gz tk-5020e5e41bb04e9bde15b10902c3dd8edcf0b1eb.tar.bz2 |
Fix [6c0d7aec67]: unicode text input Windows 8
Diffstat (limited to 'generic/tkText.c')
-rw-r--r-- | generic/tkText.c | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/generic/tkText.c b/generic/tkText.c index 1227e7b..8ae17a5 100644 --- a/generic/tkText.c +++ b/generic/tkText.c @@ -4508,7 +4508,7 @@ TkTextGetTabs( Tcl_Obj **objv; TkTextTabArray *tabArrayPtr; TkTextTab *tabPtr; - Tcl_UniChar ch; + int ch; double prevStop, lastStop; /* * Map these strings to TkTextTabAlign values. @@ -4615,7 +4615,7 @@ TkTextGetTabs( * There may be a more efficient way of getting this. */ - Tcl_UtfToUniChar(Tcl_GetString(objv[i+1]), &ch); + TkUtfToUniChar(Tcl_GetString(objv[i+1]), &ch); if (!Tcl_UniCharIsAlpha(ch)) { continue; } @@ -5966,7 +5966,7 @@ SearchCore( CLANG_ASSERT(pattern); do { - Tcl_UniChar ch; + int ch; const char *p; int lastFullLine = lastOffset; @@ -6196,7 +6196,7 @@ SearchCore( } } else { firstOffset = p - startOfLine + - Tcl_UtfToUniChar(startOfLine+matchOffset,&ch); + TkUtfToUniChar(startOfLine+matchOffset,&ch); } } } while (searchSpecPtr->all); |