Index: openacs-4/packages/dotlrn/tcl/community-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/tcl/community-procs.tcl,v
diff -u -r1.191.2.15 -r1.191.2.16
--- openacs-4/packages/dotlrn/tcl/community-procs.tcl	21 Sep 2005 02:48:00 -0000	1.191.2.15
+++ openacs-4/packages/dotlrn/tcl/community-procs.tcl	22 Sep 2005 02:17:27 -0000	1.191.2.16
@@ -2291,13 +2291,12 @@
 	       
             set extra_headers [ns_set create]
 
-            #set message_html [ad_html_text_convert -from text/enhanced -to text/html $email]
-set message_html [ad_html_text_convert -from html -to html $email]
+            set message_html [ad_html_text_convert -from text/enhanced -to text/html $email]
+	    #set message_html [ad_html_text_convert -from html -to html $email]
             # some mailers are chopping off the last few characters.
             append message_html "   "
-#            set message_text [ad_html_text_convert -from text/html -to text/plain $email]
-            set message_text [ad_html_text_convert -from html -to text $email]
-	    
+            set message_text [ad_html_text_convert -from text/html -to text/plain $message_html]
+
             # Send email in iso8859-1 charset
             set message_data [build_mime_message $message_text $message_html]
             ns_set put $extra_headers MIME-Version [ns_set get $message_data MIME-Version]