summaryrefslogtreecommitdiff
path: root/Master/tlpkg
diff options
context:
space:
mode:
authorNorbert Preining <preining@logic.at>2015-12-24 02:43:34 +0000
committerNorbert Preining <preining@logic.at>2015-12-24 02:43:34 +0000
commitd65be02cb839c25c4d948cb815a0b537e962ddcb (patch)
tree8b5635edc36b212f67cd07fbea9622477d08fa96 /Master/tlpkg
parent1ec798c0cd3022704b720e647baed86deac340dd (diff)
Revert "TLDownload: remove temp files (email RK 2015-12-23)"
This reverts svn39178 git-svn-id: svn://tug.org/texlive/trunk@39188 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/tlpkg')
-rw-r--r--Master/tlpkg/TeXLive/TLDownload.pm4
1 files changed, 1 insertions, 3 deletions
diff --git a/Master/tlpkg/TeXLive/TLDownload.pm b/Master/tlpkg/TeXLive/TLDownload.pm
index 43241966cc1..b431883d0f8 100644
--- a/Master/tlpkg/TeXLive/TLDownload.pm
+++ b/Master/tlpkg/TeXLive/TLDownload.pm
@@ -118,11 +118,9 @@ sub get_file {
return if $self->disabled;
#
my $realout = $out;
- my $outfh;
- our $outfn;
+ my ($outfh, $outfn);
if ($out eq "|") {
($outfh, $outfn) = tempfile();
- END { unlink $outfn if (-f $outfn) ; }
$realout = $outfn;
}
my $response = $self->{'ua'}->get($url, ':content_file' => $realout);