Index: openacs-4/packages/acs-admin/www/apm/build-repository.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-admin/www/apm/Attic/build-repository.tcl,v
diff -u -N -r1.22 -r1.23
--- openacs-4/packages/acs-admin/www/apm/build-repository.tcl	8 May 2018 20:46:28 -0000	1.22
+++ openacs-4/packages/acs-admin/www/apm/build-repository.tcl	9 May 2018 15:33:28 -0000	1.23
@@ -60,8 +60,8 @@
     }
 }
 
-array set channel_tag {}
-array set channel_bugfix_version {}
+array set channel_tag [list]
+array set channel_bugfix_version [list]
 
 for { } { $i < [llength $lines] } { incr i } {
     # Tag lines have the form   tag: cvs-version
@@ -114,7 +114,7 @@
 
     # Store the list of packages we've seen for this channel, so we don't include the same package twice
     # Seems odd, but we have to do this given the forked packages sitting in /contrib
-    set packages {}
+    set packages [list]
     
     # Checkout from the tag given by channel_tag($channel)
     if { $debug_p } {