summaryrefslogtreecommitdiffstats
path: root/generic/tkText.c
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2016-09-29 12:38:54 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2016-09-29 12:38:54 (GMT)
commit5020e5e41bb04e9bde15b10902c3dd8edcf0b1eb (patch)
tree27b23d9828d8e560c051b9ff8b3130101c014b23 /generic/tkText.c
parent5ae24215a70e8cd5bdbd14ad619bd4230bd22f9a (diff)
parent4c158f250ca869188d30dcf7628676f0b0de236f (diff)
downloadtk-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.c8
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);