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.66 -r1.189.2.67
--- openacs-4/packages/acs-tcl/tcl/utilities-procs.tcl	28 Sep 2020 21:04:04 -0000	1.189.2.66
+++ openacs-4/packages/acs-tcl/tcl/utilities-procs.tcl	8 Oct 2020 08:09:51 -0000	1.189.2.67
@@ -153,11 +153,16 @@
     @param destination must be the name of a valid directory to contain decompressed files
 } {
     set unzip [util::which unzip]
-    if {$unzip eq ""} {error "unzip command not found on the system."}
-    # -n means we don't overwrite existing files
+    if {$unzip eq ""} {
+        error "unzip command not found on the system."
+    }
     set cmd [list exec $unzip]
-    if {$overwrite_p} {lappend cmd -o
-    } else {lappend cmd -n}
+    if {$overwrite_p} {
+        lappend cmd -o
+    } else {
+        # -n means we don't overwrite existing files
+        lappend cmd -n
+    }
     lappend cmd $source -d $destination
     {*}$cmd
 }