diff options
| author | pooryorick <com.digitalsmarties@pooryorick.com> | 2023-03-22 21:36:46 (GMT) |
|---|---|---|
| committer | pooryorick <com.digitalsmarties@pooryorick.com> | 2023-03-22 21:36:46 (GMT) |
| commit | 10423ea0ca89205476a02e49b7941b2cef562419 (patch) | |
| tree | 837fc2151e27e153e9b31c2a5129c3920f373837 /unix/tclUnixInit.c | |
| parent | 25a166a77ad6eefbaa191f53bafe105a462121db (diff) | |
| parent | 1a75f270bd5d0c2f68fd6e08c4f1b10544ef7738 (diff) | |
| download | tcl-10423ea0ca89205476a02e49b7941b2cef562419.zip tcl-10423ea0ca89205476a02e49b7941b2cef562419.tar.gz tcl-10423ea0ca89205476a02e49b7941b2cef562419.tar.bz2 | |
Merge trunk 49a4c8f8fb: TIP 656 implementation.
Diffstat (limited to 'unix/tclUnixInit.c')
| -rw-r--r-- | unix/tclUnixInit.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/unix/tclUnixInit.c b/unix/tclUnixInit.c index 8f7a737..71b059a 100644 --- a/unix/tclUnixInit.c +++ b/unix/tclUnixInit.c @@ -473,7 +473,7 @@ TclpInitLibraryPath( */ str = getenv("TCL_LIBRARY"); /* INTL: Native. */ - Tcl_ExternalToUtfDStringEx(NULL, str, TCL_INDEX_NONE, TCL_ENCODING_NOCOMPLAIN, &buffer); + Tcl_ExternalToUtfDStringEx(NULL, NULL, str, TCL_INDEX_NONE, TCL_ENCODING_PROFILE_TCL8, &buffer, NULL); str = Tcl_DStringValue(&buffer); if ((str != NULL) && (str[0] != '\0')) { |