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.20 -r1.21
--- openacs-4/packages/acs-admin/www/apm/build-repository.tcl	5 Jan 2018 22:59:13 -0000	1.20
+++ openacs-4/packages/acs-admin/www/apm/build-repository.tcl	25 Apr 2018 19:23:25 -0000	1.21
@@ -60,8 +60,8 @@
     }
 }
 
-array set channel_tag [list]
-array set channel_bugfix_version [list]
+array set channel_tag {}
+array set channel_bugfix_version {}
 
 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 [list]
+    set packages {}
     
     # Checkout from the tag given by channel_tag($channel)
     if { $debug_p } {