Index: openacs-4/packages/forums/www/message-email.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/forums/www/message-email.tcl,v
diff -u -N -r1.9 -r1.10
--- openacs-4/packages/forums/www/message-email.tcl	9 Oct 2003 13:04:05 -0000	1.9
+++ openacs-4/packages/forums/www/message-email.tcl	7 Nov 2003 17:43:33 -0000	1.10
@@ -44,13 +44,13 @@
     # Get the data
     forum::message::get -message_id $message_id -array message
 
-    set new_body "[ad_html_to_text $pre_body]"
+    set new_body "[ad_html_to_text -- $pre_body]"
     append new_body "\n\n===================================\n\n"
     # Variables for I18N message lookup:
     set posting_date $message(posting_date)
     set user_name $message(user_name)
     append new_body "[_ forums.email_alert_body_header]\n\n"
-    append new_body "[ad_html_to_text $message(content)]\n"
+    append new_body "[ad_html_to_text -- $message(content)]\n"
 
     # Send the email
     acs_mail_lite::send -to_addr $to_email \