add missing files
[mono.git] / web / web / htmlify
index 46fe4ce4212be39abf21b901a2994aead72fcfa5..cd347cad09f7bed5d5519b40431d061299a5d7e8 100644 (file)
@@ -2,7 +2,7 @@
 $q = 1;
 
 while (<>){
-       chop;
+       chomp;
        if (/^\* (.*)$/){
                print "<h1>$1</h1>\n";
        } elsif (/^\*\* (.*)$/) {
@@ -12,14 +12,18 @@ while (<>){
        } elsif (/^\*\*\*\* (.*)$/) {
                print "<h4>$1</h4>\n";
        } elsif (/^$/) {
-               print "<p>\n";
+               print "<p>$1</p>\n";
        } elsif (/^\t\t\* (.*)$/) {
-               print "<li>$1\n";
+               print "<li>$1</li>\n";
        } elsif (/^\@item (.*)$/){
                $name = $link = $1;
                $link =~ s/ //g;
                print "<a name=\"$link\">\n";
-               print "<h3>$name</h3>\n";
+               if (/Beta 1/){
+                   print "<h2>$name</h2>\n";
+               } else {
+                   print "<h3>$name</h3>\n";
+               }
        } elsif (/^Q: (.*)$/){
                print "<p><a name=\"q$q\"></a><b>Question $q:</b> $1\n";
                $q++;