summaryrefslogtreecommitdiffstats
path: root/generic/tclZipfs.c
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2019-09-14 13:07:19 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2019-09-14 13:07:19 (GMT)
commitfc77f0dda4c38f5d8a31b62f9e2cb35927922dc5 (patch)
tree6db3c9a8eecf14ab943a33f85a465aa9c37758cc /generic/tclZipfs.c
parent4396d37f6f0fc2dc3b776872b73ff9717ea26e43 (diff)
parent93022718af12833e135ad743bc6169bcfd443ddf (diff)
downloadtcl-fc77f0dda4c38f5d8a31b62f9e2cb35927922dc5.zip
tcl-fc77f0dda4c38f5d8a31b62f9e2cb35927922dc5.tar.gz
tcl-fc77f0dda4c38f5d8a31b62f9e2cb35927922dc5.tar.bz2
Merge 8.7
Diffstat (limited to 'generic/tclZipfs.c')
-rw-r--r--generic/tclZipfs.c3
1 files changed, 2 insertions, 1 deletions
diff --git a/generic/tclZipfs.c b/generic/tclZipfs.c
index 914c6bb..4e7cb1f 100644
--- a/generic/tclZipfs.c
+++ b/generic/tclZipfs.c
@@ -4913,7 +4913,8 @@ TclZipfs_AppHook(
#ifdef _WIN32
Tcl_DString ds;
- archive = Tcl_WinTCharToUtf((*argvPtr)[1], -1, &ds);
+ Tcl_DStringInit(&ds);
+ archive = Tcl_WCharToUtfDString((*argvPtr)[1], -1, &ds);
#else /* !_WIN32 */
archive = (*argvPtr)[1];
#endif /* _WIN32 */