--- capa/capa51/Discuss/Ver1.3/Attic/capadiscuss	1999/10/18 20:58:33	1.4
+++ capa/capa51/Discuss/Ver1.3/Attic/capadiscuss	1999/12/16 22:08:57	1.5
@@ -327,8 +327,8 @@ sub ViewProblem {
           $hidebutton = &UnHideButtonHTML;
           $messagenote = "Hidden by $hiddenuser on $hiddendate at $hiddentime from $hiddenaddr";
         }
-	$message =~ s/</&lt;/g;
-	$message =~ s/>/&gt;/g;
+#	$message =~ s/</&lt;/g;
+#	$message =~ s/>/&gt;/g;
         &ViewProblemGutsHTML;
       }
     }
@@ -583,7 +583,9 @@ sub WriteMsg {
   # add sr to grab e-mail address of user
 
   $message = $form{'message'};
-  $message =~ s/\n\r\n/<p>/g;
+  $message =~ s/</&lt;/g;
+  $message =~ s/>/&gt;/g;
+  $message =~ s/((\n\r)|(\n))\n/<p>/g;
   $message =~ s/\n/<br>/g;
 
   # check if posted anonymously