Index: openacs.org-dev/packages/acs-tcl/tcl/text-html-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs.org-dev/packages/acs-tcl/tcl/text-html-procs.tcl,v
diff -u -r1.2 -r1.3
--- openacs.org-dev/packages/acs-tcl/tcl/text-html-procs.tcl	17 Sep 2002 18:25:51 -0000	1.2
+++ openacs.org-dev/packages/acs-tcl/tcl/text-html-procs.tcl	28 Oct 2002 15:41:38 -0000	1.3
@@ -586,9 +586,9 @@
 
 	    if { ![info exists allowed_tag($tagname)] } {
 		# Nope, this was a naughty tag.
-		return "For security reasons we only accept the submission of HTML
-		containing the following tags: <code>[join $allowed_tags_list " "]</code>. 
-		You have a &lt;$tagname&gt; tag in there."
+		return "<p>For security reasons we only accept the submission of HTML
+		containing the following tags:<pre>[join $allowed_tags_list " "]</pre> 
+		You have a &lt;$tagname&gt; tag in there.</p>"
 	    } else {
 		# Legal tag.