Fix a scoping bug.

diff --git a/www/index.pl b/www/index.pl
index 2cecec4672ad48d7a1893ef4a951989f367c556b..b96058d341677c82ce8218f89de827f1c4c990a1 100755 (executable)
--- a/www/index.pl
+++ b/www/index.pl
@@ -332,7 +332,6 @@ EOF
 my $aux_parms = get_auxillary_parameters($dbh);
 my $match_stddev = $aux_parms->{-2} * sqrt(2.0);
 
-my $season;
 my $division = $cgi->param('divisjon') // -1;
 my $subdivision = $cgi->param('avdeling') // -1;
 
@@ -343,7 +342,7 @@ my @subdivisions = get_subdivisions($dbh, $season, $division);
 $subdivision = 1 if (!grep { $_ == $subdivision } @subdivisions);
 
 get_players_and_ratings($dbh, $season, $division, $subdivision);
-my @matches = get_matches($dbh, $season, $division, $subdivision);
+@matches = get_matches($dbh, $season, $division, $subdivision);
 my $cov = get_covariance_matrix($dbh, keys %players);
 
 print_header($cgi, 'WLoH-plasseringsannsynlighetsberegning');