Made the front page a bit more... different.

[foosball] / www / index.pl

diff --git a/www/index.pl b/www/index.pl
index c31200a59586c5260fbadb8533cebdca7b95af64..a9f2d43b7d022a7dd133f424b004dc3436afba1d 100755 (executable)
--- a/www/index.pl
+++ b/www/index.pl
@@ -65,6 +65,7 @@ my @last_games = ();
 $q = $dbh->prepare('
 select * from (
     select
+        gametime as sort_gametime,
         to_char(gametime, \'IYYY-MM-DD HH24:MI\') as gametime,
         \'Double\' as type,
        team1_username1 || \' / \' || team1_username2 as username1,
@@ -91,6 +92,7 @@ select * from (
            and re.team2_username2=ra4.username
     union all
     select
+        gametime as sort_gametime,
         to_char(gametime, \'IYYY-MM-DD HH24:MI\') as gametime,
        \'Single\' as type,
        username1,
@@ -110,7 +112,7 @@ select * from (
            on re.gametime=ra2.ratetime
            and re.username2=ra2.username
 ) t1
-order by gametime desc limit 10');
+order by sort_gametime desc limit 10');
 $q->execute();
 while (my $ref = $q->fetchrow_hashref) {
        if (defined($ref->{'diff2'})) {
@@ -132,8 +134,8 @@ $dbh->disconnect;
 print CGI->header(-type=>'application/xhtml+xml');
 
 my $doc = XML::Template::process_file('index.xml', {
-       '#singletop' => \@single_top,
-       '#doubletop' => \@double_top,
-       '#lastgames' => \@last_games,
+       '#singletop' => XML::Template::alternate('tr/class', \@single_top, 'odd', 'even'),
+       '#doubletop' => XML::Template::alternate('tr/class', \@double_top, 'odd', 'even'),
+       '#lastgames' => XML::Template::alternate('tr/class', \@last_games, 'odd', 'even'),
 });
 print $doc->toString;