diff options
Diffstat (limited to 'generic/tclZipfs.c')
| -rw-r--r-- | generic/tclZipfs.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclZipfs.c b/generic/tclZipfs.c index 9f6d8aa..3a63b18 100644 --- a/generic/tclZipfs.c +++ b/generic/tclZipfs.c @@ -1917,7 +1917,7 @@ ListMountPoints( return (ZipFS.zipHash.numEntries ? TCL_OK : TCL_BREAK); } - resultList = Tcl_NewObj(); + TclNewObj(resultList); for (hPtr = Tcl_FirstHashEntry(&ZipFS.zipHash, &search); hPtr; hPtr = Tcl_NextHashEntry(&search)) { zf = (ZipFile *) Tcl_GetHashValue(hPtr); |