Index: openacs-4/packages/email-handler/tcl/email-util-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/email-handler/tcl/email-util-procs.tcl,v
diff -u -N -r1.3 -r1.4
--- openacs-4/packages/email-handler/tcl/email-util-procs.tcl	2 Dec 2013 09:16:43 -0000	1.3
+++ openacs-4/packages/email-handler/tcl/email-util-procs.tcl	2 Dec 2013 09:33:38 -0000	1.4
@@ -83,8 +83,8 @@
     append body $encoded_data
     append body "\n--[set mime_boundary]--\n"
     acs_mail_lite::send -to_addr $to -from_addr $from -subject $subject -body $body -extraheaders [list \
-      "Mime-Version" "1.0" \
-      "Content-Type" "multipart/mixed; boundary=\"$mime_boundary\"" \
+      [list "Mime-Version" "1.0"] \
+      [list "Content-Type" "multipart/mixed; boundary=\"$mime_boundary\""] \
     ]
 
 }
\ No newline at end of file