Index: openacs-4/packages/acs-tcl/tcl/utilities-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/utilities-procs.tcl,v
diff -u -r1.189.2.85 -r1.189.2.86
--- openacs-4/packages/acs-tcl/tcl/utilities-procs.tcl	18 May 2021 20:01:35 -0000	1.189.2.85
+++ openacs-4/packages/acs-tcl/tcl/utilities-procs.tcl	19 May 2021 07:04:49 -0000	1.189.2.86
@@ -179,7 +179,7 @@
     #
     if {[info commands ::util::zip_file_contains_valid_filenames] ne ""
         && $::tcl_platform(os) eq "Linux"
-        && ![::util::zip_file_valid_filenames $source] } {
+        && ![::util::zip_file_contains_valid_filenames $source] } {
         #
         # The option "-O" works apparently only under Linux and might
         # depend on the version of "unzip". We assume here that the