From ea74f5e08fd9cc8aecf7c81de84ad399c2a38222 Mon Sep 17 00:00:00 2001
From: "Steinar H. Gunderson" <sgunderson@bigfoot.com>
Date: Tue, 24 Apr 2012 23:10:54 +0200
Subject: [PATCH] Turn tempfile cleanup back on.

---
 www/index.pl | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

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]};
-- 
2.39.2