| 45 |  |  | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 46 |  | <a href="http://www.i-scream.org.uk"><img border="0" src="../i-scream.gif"></a> | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 47 |  |  | 
 
 
 
 
 
 
 
 
 
 
 | 48 | < | <center><table border="0" cellpadding="4" cellspacing="1" bgcolor="#000066" align="center"><tr><td bgcolor="#ffffcc"><font color="#000066" face="arial,sans-serif" size="5"><b><center>$heading</center></b></font></td></tr></table></center> | 
 
 
 
 
 
 
 
 
 | 48 | > | <h2>$heading</h2> | 
 
 
 
 
 
 
 
 
 
 
 | 49 |  | <p> </p> | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 50 |  |  | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 51 |  | END | 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 | 59 |  |  | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 60 |  | print "<table border=\"0\" bgcolor=\"#000066\" cellpadding=\"5\" width=\"100%\">"; | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 61 |  | print "<tr><td><font size=\"4\"><b><a href=\"/cgi-bin/cvs/viewcvs.cgi/$module\">$module module</a></b></font></td></tr>"; | 
 
 
 
 
 
 
 
 
 
 
 | 62 | < | print "<tr><td bgcolor=\"white\">"; | 
 
 
 
 
 
 
 
 
 | 62 | > | print "<tr><td bgcolor=\"white\">\n"; | 
 
 
 
 
 
 
 
 
 
 
 | 63 |  |  | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 64 |  | my(@lines) = `$logcmd $module 2>&1`; | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 65 |  | if(@lines == 0) { | 
 
 
 
 
 
 
 
 
 
 
 | 66 | < | print "There have been no commits in this module during this period."; | 
 
 
 
 
 
 
 
 
 | 66 | > | print "There have been no commits in this module during this period.\n"; | 
 
 
 
 
 
 
 
 
 
 
 | 67 |  | } | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 68 |  | else { | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 69 |  | foreach my $line (@lines) { | 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 | 83 |  | } | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 84 |  | } | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 85 |  | } | 
 
 
 
 
 
 
 
 
 
 
 | 86 | < | print "</td></tr>"; | 
 
 
 
 
 
 
 
 
 | 86 | > | print "</td></tr>\n"; | 
 
 
 
 
 
 
 
 
 
 
 | 87 |  |  | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 88 |  | print "</table><p>\n\n"; | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 89 |  | } |