summaryrefslogtreecommitdiffstats
path: root/generic/tclZipfs.c
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2022-02-10 09:37:55 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2022-02-10 09:37:55 (GMT)
commit110e6cae5e332cfbbbf35253b9dea01162a96975 (patch)
treeb11847254dc047db3c1489685280c2a8c7503f27 /generic/tclZipfs.c
parent805db9224eba7e498db28cff6b1b9eaecdef33ab (diff)
parent8f805cf711937914ecd371343acfe9a4b8f27238 (diff)
downloadtcl-110e6cae5e332cfbbbf35253b9dea01162a96975.zip
tcl-110e6cae5e332cfbbbf35253b9dea01162a96975.tar.gz
tcl-110e6cae5e332cfbbbf35253b9dea01162a96975.tar.bz2
Merge 8.6
Diffstat (limited to 'generic/tclZipfs.c')
-rw-r--r--generic/tclZipfs.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclZipfs.c b/generic/tclZipfs.c
index d9c6712..afd3db5 100644
--- a/generic/tclZipfs.c
+++ b/generic/tclZipfs.c
@@ -3041,7 +3041,7 @@ ZipFSMkZipOrImg(
}
}
Tcl_IncrRefCount(list);
- if (Tcl_ListObjGetElements(interp, list, &lobjc, &lobjv) != TCL_OK) {
+ if (TclListObjGetElements(interp, list, &lobjc, &lobjv) != TCL_OK) {
Tcl_DecrRefCount(list);
return TCL_ERROR;
}