From: Steinar H. Gunderson Date: Tue, 24 Apr 2012 21:10:54 +0000 (+0200) Subject: Turn tempfile cleanup back on. X-Git-Url: https://git.sesse.net/?p=wloh;a=commitdiff_plain;h=ea74f5e08fd9cc8aecf7c81de84ad399c2a38222 Turn tempfile cleanup back on. --- diff --git a/www/index.pl b/www/index.pl index 109caae..0e8a5a1 100755 --- 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]};