Index: openacs-4/packages/dotlrn/www/spam.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/spam.tcl,v
diff -u -r1.32 -r1.33
--- openacs-4/packages/dotlrn/www/spam.tcl	7 Aug 2017 23:48:09 -0000	1.32
+++ openacs-4/packages/dotlrn/www/spam.tcl	30 Sep 2017 18:12:52 -0000	1.33
@@ -205,7 +205,7 @@
 	set message "$message"
 	set message_type "html"
     } elseif {$format eq "pre"} {
-	set message [ad_text_to_html $message]
+	set message [ad_text_to_html -- $message]
 	set message_type "html"
     } else {
 	set message [ns_quotehtml $message]