Index: openacs-4/packages/messages/www/update-numbers.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/messages/www/update-numbers.tcl,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/messages/www/update-numbers.tcl	31 Aug 2010 21:30:42 -0000	1.1
+++ openacs-4/packages/messages/www/update-numbers.tcl	26 Apr 2018 08:56:38 -0000	1.2
@@ -14,7 +14,7 @@
 set user_id [ad_conn user_id]
 set community_id [dotlrn_community::get_community_id]
 set folders_info [db_list_of_lists count_new_messages {}]
-set numbers [list]
+set numbers {}
 foreach folder $folders_info {
     lappend numbers [lindex $folder 0]
     lappend numbers [lindex $folder 1]