From ac666f38ebf2b10b257e0bf52de2f281b65b6d14 Mon Sep 17 00:00:00 2001
From: "Steinar H. Gunderson" <Steinar H. Gunderson sesse@debian.org>
Date: Sat, 17 Mar 2012 18:35:55 +0100
Subject: [PATCH] Lock season to newest.

---
 www/index.pl | 26 +++++---------------------
 1 file changed, 5 insertions(+), 21 deletions(-)

diff --git a/www/index.pl b/www/index.pl
index a4c16fd..7cedd6f 100755
--- a/www/index.pl
+++ b/www/index.pl
@@ -138,7 +138,7 @@ while (my $ref = $q->fetchrow_hashref) {
 }
 $match_stddev = $parms{-2} * sqrt(2.0);
 
-my $season = $cgi->param('sesong') // -1;
+my $season;
 my $division = $cgi->param('divisjon') // -1;
 my $subdivision = $cgi->param('avdeling') // -1;
 
@@ -179,33 +179,17 @@ td {
     <p>Spillerne er sortert etter nick.</p>
 
     <form method="get" action="/">
-      <p>Sesong:
-        <select name="sesong">
 EOF
 
-$q = $dbh->prepare('SELECT DISTINCT(sesong) FROM fotballserier ORDER BY sesong');
+$q = $dbh->prepare('SELECT MAX(sesong) AS max_sesong FROM fotballserier');
 $q->execute;
-my $max_season;
-my @seasons = ();
+my $season;
 while (my $ref = $q->fetchrow_hashref) {
-	push @seasons, $ref->{'sesong'};
-	$max_season = $ref->{'sesong'};
-}
-
-my $found_season = 0;
-for my $s (@seasons) {
-	if ($s == $season || (!$found_season && $s == $max_season)) {
-		print "        <option value=\"$s\" selected=\"selected\">$s</option>\n";
-		$season = $s;
-		$found_season = 1;
-	} else {
-		print "        <option value=\"$s\">$s</option>\n";
-	}
+	$season = $ref->{'max_sesong'};
 }
 
 print <<"EOF";
-        </select>
-        Divisjon:
+     <p>Divisjon:
         <select name="divisjon">
 EOF
 
-- 
2.39.2