summaryrefslogtreecommitdiffstats
path: root/unix
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2019-10-24 07:57:54 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2019-10-24 07:57:54 (GMT)
commitc3353d5a645c33f35445ab3c510dfef988897dd2 (patch)
treee324bac995b3095c40458e48569929c2510e65e1 /unix
parent710734302bdc7b1230d0de70b5fed5ccdaffa4bd (diff)
parent5837fdc42cd33f9b1f81bc4f75b9dad62b0631b2 (diff)
downloadtcl-c3353d5a645c33f35445ab3c510dfef988897dd2.zip
tcl-c3353d5a645c33f35445ab3c510dfef988897dd2.tar.gz
tcl-c3353d5a645c33f35445ab3c510dfef988897dd2.tar.bz2
Backout [0f2870649c804dd8], since testcase encoding-2.2 fails
Diffstat (limited to 'unix')
-rw-r--r--unix/tclUnixFile.c5
1 files changed, 2 insertions, 3 deletions
diff --git a/unix/tclUnixFile.c b/unix/tclUnixFile.c
index fec528e..8268132 100644
--- a/unix/tclUnixFile.c
+++ b/unix/tclUnixFile.c
@@ -365,8 +365,7 @@ TclpMatchInDirectory(
* and pattern. If so, add the file to the result.
*/
-
- utfname = Tcl_ExternalToUtfDString(encoding, entryPtr->d_name, -1,
+ utfname = Tcl_ExternalToUtfDString(NULL, entryPtr->d_name, -1,
&utfDs);
if (Tcl_StringCaseMatch(utfname, pattern, 0)) {
int typeOk = 1;
@@ -381,7 +380,7 @@ TclpMatchInDirectory(
if (typeOk) {
Tcl_ListObjAppendElement(interp, resultPtr,
TclNewFSPathObj(pathPtr, utfname,
- Tcl_DStringLength(&utfDs), encoding));
+ Tcl_DStringLength(&utfDs)));
}
}
Tcl_DStringFree(&utfDs);