Turn tempfile cleanup back on.

diff --git a/www/index.pl b/www/index.pl
index 109caae89e568f69e70bb1e0ecc47ec3ee6ebe82..0e8a5a16dcf5d4ce753469fc56b5b73873a0b5c7 100755 (executable)
--- a/www/index.pl
+++ b/www/index.pl
@@ -248,7 +248,7 @@ EOF
                $prob{$player} = [ @x[1..$#x] ];
        }
        close MCCALC;
-       #unlink $tmpnam;
+       unlink $tmpnam;
 
        my $num_games = scalar keys %prob;
        for my $i (1..$num_games) {
@@ -382,7 +382,7 @@ if (defined($match_player) && defined($match_position)) {
                push @scenario, [ $1, $2, $3 ];
        }
        close MCCALC;
-       #unlink $tmpnam;
+       unlink $tmpnam;
 
        my @sorted_players = sort { $players{$a} cmp $players{$b} } keys %players;
        my $player_name = $players{$sorted_players[$match_player]};