Index: openacs-4/packages/contacts/lib/letter.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/contacts/lib/letter.tcl,v
diff -u -N -r1.13 -r1.14
--- openacs-4/packages/contacts/lib/letter.tcl	25 Apr 2018 19:47:46 -0000	1.13
+++ openacs-4/packages/contacts/lib/letter.tcl	26 Apr 2018 08:56:38 -0000	1.14
@@ -132,7 +132,7 @@
 	    set content_html "${content_html}\n\n${footer}"
 	}
 
-	set messages [list]
+	set messages {}
 	set date [join [template::util::date::get_property linear_date_no_time $date] "-"]
 
 	if { $include_address eq "1" } {