diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-07-12 21:57:23 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-07-12 21:57:23 (GMT) |
commit | 1356a4c54a562c84b61684a97299f5daa2bcd5eb (patch) | |
tree | b31b00412b431e7bc776b0225a3499dc5757313f /generic | |
parent | f8f63d6b16b29c35d6febba81b8ce7e51bd4e5c1 (diff) | |
parent | 0297938694d8002775f3310ce8d9c31b03e157b6 (diff) | |
download | tk-1356a4c54a562c84b61684a97299f5daa2bcd5eb.zip tk-1356a4c54a562c84b61684a97299f5daa2bcd5eb.tar.gz tk-1356a4c54a562c84b61684a97299f5daa2bcd5eb.tar.bz2 |
Merge 8.7
Diffstat (limited to 'generic')
-rw-r--r-- | generic/tkIcu.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tkIcu.c b/generic/tkIcu.c index e9f18be..d27ea36 100644 --- a/generic/tkIcu.c +++ b/generic/tkIcu.c @@ -97,7 +97,7 @@ startEndOfCmd( } Tcl_DStringInit(&ds); str = Tcl_GetStringFromObj(objv[1], &len); - Tcl_UtfToUniCharDString(str, len, &ds); + Tcl_UtfToChar16DString(str, len, &ds); len = Tcl_DStringLength(&ds)/2; if (TkGetIntForIndex(objv[2], len-1, 0, &idx) != TCL_OK) { Tcl_DStringFree(&ds); |