Index: openacs-4/packages/expenses/tcl/expenses-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/expenses/tcl/expenses-procs.tcl,v
diff -u -N -r1.7 -r1.8
--- openacs-4/packages/expenses/tcl/expenses-procs.tcl	4 Aug 2005 06:51:55 -0000	1.7
+++ openacs-4/packages/expenses/tcl/expenses-procs.tcl	26 Apr 2018 08:56:38 -0000	1.8
@@ -103,7 +103,7 @@
 
 	if { [db_0or1row "get_treeid" "select tree_id from category_tree_translations where name = 'Terms'"] } {
 
-		set terms [list]
+		set terms {}
 		set categories [category::get_mapped_categories $package_id]
 		foreach category_id $categories {
 			if { [category::get_tree $category_id] == $tree_id } {