--- trunk/back2html.pm	2003/07/06 13:03:35	79
+++ trunk/back2html.pm	2003/07/08 08:24:13	80
@@ -7,6 +7,8 @@
 sub back2html {
 	my $html = shift;
 
+	$html =~ s/</&lt;/g;
+	$html =~ s/>/&gt;/g;
 	my $out;
 	foreach $line (split(/\s*###\s*/,$html)) {
 		$out .= "<tr><td valign=\"top\">";