From: Tim Bishop <tim@bishnet.net>
Date: Wed, 13 Jun 2001 16:32:41 +0000 (+0000)
Subject: Improved the resulting HTML, making it vaguely readable.
X-Git-Tag: PRE_WWW_REDESIGN~112
X-Git-Url: http://git.i-scream.org/?a=commitdiff_plain;h=c32c0d241cf3cccee431fb1c4e851568123f5ff7;p=www.i-scream.org.git

Improved the resulting HTML, making it vaguely readable.
---

diff --git a/cgi-bin/cvslog.cgi b/cgi-bin/cvslog.cgi
index 5374744..aef970c 100755
--- a/cgi-bin/cvslog.cgi
+++ b/cgi-bin/cvslog.cgi
@@ -59,8 +59,8 @@ my(@modules) = split (/\s+/, $modulelist);
 
 foreach my $module (@modules) {
 
-    print "<table border=\"0\" bgcolor=\"#000066\" cellpadding=\"5\" width=\"100%\">";
-    print "<tr><td><font size=\"4\"><b><a href=\"/cgi-bin/cvs/viewcvs.cgi/$module\">$module module</a></b></font></td></tr>";
+    print "<table border=\"0\" bgcolor=\"#000066\" cellpadding=\"5\" width=\"100%\">\n\n";
+    print "<tr><td>\n<font size=\"4\"><b><a href=\"/cgi-bin/cvs/viewcvs.cgi/$module\">$module module</a></b></font>\n</td></tr>\n\n";
     print "<tr><td bgcolor=\"white\">\n";
 
     my(@lines) = `$logcmd $module 2>&1`;
@@ -71,17 +71,17 @@ foreach my $module (@modules) {
         foreach my $line (@lines) {
 
             if ($line =~ /^([0-9]{4}-[0-9]{2}-[0-9]{2}.*?)([^\s]+)$/) {
-                print "<font color=\"blue\"><b>";
+                print "\n<font color=\"blue\"><b>";
                 print HTML_encode($1);
                 print "</b><i>";
                 print HTML_encode("by $2");
-                print "</i></font>"
+                print "</i></font>\n"
             }
             else {
                 chop $line;
                 print "<code>";
                 print HTML_encode($line);
-                print "</code><br>"
+                print "</code><br>\n"
             }
         }
     }