Index: openacs-4/packages/webmail-system/www/compose.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/webmail-system/www/compose.tcl,v
diff -u -r1.4 -r1.5
--- openacs-4/packages/webmail-system/www/compose.tcl	26 Apr 2018 08:56:39 -0000	1.4
+++ openacs-4/packages/webmail-system/www/compose.tcl	9 May 2018 15:33:33 -0000	1.5
@@ -44,7 +44,7 @@
 
 # ------------------------- CREATE FORM ------------------------- #
 
-#set opts {}
+#set opts [list]
 
 #db_multirow emails get_emails {} {
 #    lappend opts [list $email]
@@ -170,7 +170,7 @@
 	set has_attach_p 0
     }
 
-    set emailList {}
+    set emailList [list]
     package require smtp
     package require mime