summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--Master/tlpkg/TeXLive/TLDownload.pm1
1 files changed, 1 insertions, 0 deletions
diff --git a/Master/tlpkg/TeXLive/TLDownload.pm b/Master/tlpkg/TeXLive/TLDownload.pm
index b431883d0f8..64a9a3e5b7d 100644
--- a/Master/tlpkg/TeXLive/TLDownload.pm
+++ b/Master/tlpkg/TeXLive/TLDownload.pm
@@ -121,6 +121,7 @@ sub get_file {
my ($outfh, $outfn);
if ($out eq "|") {
($outfh, $outfn) = tempfile();
+ eval "END { unlink(\"$outfn\") if (-r \"$outfn\") ; }";
$realout = $outfn;
}
my $response = $self->{'ua'}->get($url, ':content_file' => $realout);