Index: openacs-4/packages/ecommerce/www/process-order-quantity-shipping.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/process-order-quantity-shipping.tcl,v
diff -u -N -r1.13 -r1.14
--- openacs-4/packages/ecommerce/www/process-order-quantity-shipping.tcl	25 Apr 2018 19:47:47 -0000	1.13
+++ openacs-4/packages/ecommerce/www/process-order-quantity-shipping.tcl	9 May 2018 15:33:31 -0000	1.14
@@ -35,7 +35,7 @@
 
 if {[info exists quantity]} {
     set arraynames [array names quantity]
-    set fullarraynames {}
+    set fullarraynames [list]
     foreach arrayname $arraynames {
 	set quantity.$arrayname $quantity($arrayname)
 	lappend fullarraynames "quantity.$arrayname"