diff options
| author | apnadkarni <apnmbx-wits@yahoo.com> | 2023-03-18 03:35:02 (GMT) |
|---|---|---|
| committer | apnadkarni <apnmbx-wits@yahoo.com> | 2023-03-18 03:35:02 (GMT) |
| commit | 1a75f270bd5d0c2f68fd6e08c4f1b10544ef7738 (patch) | |
| tree | f1da19f05713baf1354aa6cd038c562278b5470d /unix/tclUnixInit.c | |
| parent | 4ce715f36aa76db649754d59c735144551d9aac5 (diff) | |
| parent | b90a2e051c162b1ba5959895af75c59b58842b87 (diff) | |
| download | tcl-1a75f270bd5d0c2f68fd6e08c4f1b10544ef7738.zip tcl-1a75f270bd5d0c2f68fd6e08c4f1b10544ef7738.tar.gz tcl-1a75f270bd5d0c2f68fd6e08c4f1b10544ef7738.tar.bz2 | |
TIP 656 accepted
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')) { |