diff options
Diffstat (limited to 'www/irc/irclogs.pl')
-rwxr-xr-x | www/irc/irclogs.pl | 9 |
1 files changed, 4 insertions, 5 deletions
diff --git a/www/irc/irclogs.pl b/www/irc/irclogs.pl index e04e28b053..d020c634e1 100755 --- a/www/irc/irclogs.pl +++ b/www/irc/irclogs.pl | |||
@@ -7,7 +7,7 @@ opendir(DIR, ".") or | |||
7 | @logs = sort grep { /^rockbox-/ } readdir(DIR); | 7 | @logs = sort grep { /^rockbox-/ } readdir(DIR); |
8 | closedir DIR; | 8 | closedir DIR; |
9 | 9 | ||
10 | print "<table><tr valign=top>\n"; | 10 | print "<table class=archive>\n"; |
11 | 11 | ||
12 | $lasty = 0; | 12 | $lasty = 0; |
13 | $lastm = 0; | 13 | $lastm = 0; |
@@ -23,17 +23,16 @@ for ( @logs ) { | |||
23 | $d = $3; | 23 | $d = $3; |
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 "</tr><tr>\n" if $lastm != 0; |
27 | # if ( $m % 6 == 0 ) { | 27 | # if ( $m % 6 == 0 ) { |
28 | # print "</tr><tr valign=top>\n"; | 28 | # print "</tr><tr valign=top>\n"; |
29 | # } | 29 | # } |
30 | print "<td align=\"right\"><b>$mname $y</b>\n"; | 30 | print "<th>$mname</th>\n"; |
31 | print "<ul>\n"; | ||
32 | $lastm = $m; | 31 | $lastm = $m; |
33 | } | 32 | } |
34 | # $lines = `wc -l $file` + 0; | 33 | # $lines = `wc -l $file` + 0; |
35 | # print "<li><a test href=\"$file\">$mname $d</a> <small>($lines lines)</small>\n"; | 34 | # print "<li><a test href=\"$file\">$mname $d</a> <small>($lines lines)</small>\n"; |
36 | print "<li><a test href=\"$file\">$mname $d</a>\n"; | 35 | print "<td><a test href=\"$file\">$d</a></td>\n"; |
37 | } | 36 | } |
38 | } | 37 | } |
39 | #print "<li><a href=\"daily/$_\">$_</a> ($size bytes) $log\n"; | 38 | #print "<li><a href=\"daily/$_\">$_</a> ($size bytes) $log\n"; |