diff options
Diffstat (limited to 'www/irc')
-rwxr-xr-x | www/irc/irclogs.pl | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/www/irc/irclogs.pl b/www/irc/irclogs.pl index 361c1f5682..e04e28b053 100755 --- a/www/irc/irclogs.pl +++ b/www/irc/irclogs.pl | |||
@@ -24,10 +24,15 @@ for ( @logs ) { | |||
24 | $mname = ucfirst MonthNameEng($m); | 24 | $mname = ucfirst MonthNameEng($m); |
25 | if ( $m != $lastm ) { | 25 | if ( $m != $lastm ) { |
26 | print "</ul></td>\n" if $lastm != 0; | 26 | print "</ul></td>\n" if $lastm != 0; |
27 | # if ( $m % 6 == 0 ) { | ||
28 | # print "</tr><tr valign=top>\n"; | ||
29 | # } | ||
27 | print "<td align=\"right\"><b>$mname $y</b>\n"; | 30 | print "<td align=\"right\"><b>$mname $y</b>\n"; |
28 | print "<ul>\n"; | 31 | print "<ul>\n"; |
29 | $lastm = $m; | 32 | $lastm = $m; |
30 | } | 33 | } |
34 | # $lines = `wc -l $file` + 0; | ||
35 | # print "<li><a test href=\"$file\">$mname $d</a> <small>($lines lines)</small>\n"; | ||
31 | print "<li><a test href=\"$file\">$mname $d</a>\n"; | 36 | print "<li><a test href=\"$file\">$mname $d</a>\n"; |
32 | } | 37 | } |
33 | } | 38 | } |