summaryrefslogtreecommitdiffstats
path: root/macosx
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2023-03-18 09:15:20 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2023-03-18 09:15:20 (GMT)
commit381a18837e29048d841319f21cbcfb3f36bcf8b3 (patch)
treeeed067f0aa90dc55c26ea0f68e1ec77200b49504 /macosx
parent5fe5ad497b285e93ff7d3efc929e8f2ac88b779e (diff)
parentd5ac687adb2b0e67f8afcdf007890d6da415f26c (diff)
downloadtcl-381a18837e29048d841319f21cbcfb3f36bcf8b3.zip
tcl-381a18837e29048d841319f21cbcfb3f36bcf8b3.tar.gz
tcl-381a18837e29048d841319f21cbcfb3f36bcf8b3.tar.bz2
Merge 9.0
Diffstat (limited to 'macosx')
-rw-r--r--macosx/tclMacOSXFCmd.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/macosx/tclMacOSXFCmd.c b/macosx/tclMacOSXFCmd.c
index b1859c4..5375a49 100644
--- a/macosx/tclMacOSXFCmd.c
+++ b/macosx/tclMacOSXFCmd.c
@@ -643,7 +643,7 @@ SetOSTypeFromAny(
size_t length;
string = Tcl_GetStringFromObj(objPtr, &length);
- Tcl_UtfToExternalDStringEx(encoding, string, length, TCL_ENCODING_NOCOMPLAIN, &ds);
+ Tcl_UtfToExternalDStringEx(NULL, encoding, string, length, TCL_ENCODING_PROFILE_TCL8, &ds, NULL);
if (Tcl_DStringLength(&ds) > 4) {
if (interp) {