Index: openacs-4/packages/invoices/lib/invoice-items-list.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/invoices/lib/invoice-items-list.tcl,v
diff -u -r1.7 -r1.8
--- openacs-4/packages/invoices/lib/invoice-items-list.tcl	3 Apr 2018 20:36:19 -0000	1.7
+++ openacs-4/packages/invoices/lib/invoice-items-list.tcl	26 Apr 2018 08:56:38 -0000	1.8
@@ -64,7 +64,7 @@
 
 # Elements to construnct row_lists
 if { [exists_and_not_null elements] } {
-    set row_list [list]
+    set row_list {}
     foreach element $elements {
 	if { ![string equal $element "categories"] } {
 	    lappend row_list $element
@@ -79,16 +79,16 @@
 }
 
 # Create the elements for the list template
-set elements [list]
-set categories_filter [list]
+set elements {}
+set categories_filter {}
 
 # We are going to create the elements for each mapped category tree
 if { $categories_p } {
     set categories_trees [db_list_of_lists get_category_trees { }]
     
-    set mapped_objects [list]
-    set multirow_extend [list]
-    set tree_ids [list]
+    set mapped_objects {}
+    set multirow_extend {}
+    set tree_ids {}
     
     foreach tree $categories_trees {
 	set tree_name [lindex $tree 0]