summaryrefslogtreecommitdiffstats
path: root/generic/tclZipfs.c
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2022-02-10 09:49:43 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2022-02-10 09:49:43 (GMT)
commitdabd6dee2d365e65a816652ccb036c9f817debfa (patch)
treed163ce9f8361dc648d5961611d2754d96d72a7f9 /generic/tclZipfs.c
parentda5c2b08af1531f171e79ee0d09a5288eabbec46 (diff)
parent30858a86531e0952e6be9be87173baa4fdbed5c4 (diff)
downloadtcl-dabd6dee2d365e65a816652ccb036c9f817debfa.zip
tcl-dabd6dee2d365e65a816652ccb036c9f817debfa.tar.gz
tcl-dabd6dee2d365e65a816652ccb036c9f817debfa.tar.bz2
Merge 9.0
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 ac6adf9..c421635 100644
--- a/generic/tclZipfs.c
+++ b/generic/tclZipfs.c
@@ -3033,7 +3033,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;
}