summaryrefslogtreecommitdiff
path: root/Master/tlpkg/TeXLive/TLPDB.pm
diff options
context:
space:
mode:
authorNorbert Preining <preining@logic.at>2009-08-25 11:46:03 +0000
committerNorbert Preining <preining@logic.at>2009-08-25 11:46:03 +0000
commita6e64f22f311495dbb47dae3c3dd72a89d329891 (patch)
tree638c9eeb49ab91ae565e2b1344a127269083a5be /Master/tlpkg/TeXLive/TLPDB.pm
parentf8bb7bf00ab4d0657f321d42185e32109d44cd5d (diff)
reorder so that temp files can be removed
git-svn-id: svn://tug.org/texlive/trunk@14856 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/tlpkg/TeXLive/TLPDB.pm')
-rw-r--r--Master/tlpkg/TeXLive/TLPDB.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/Master/tlpkg/TeXLive/TLPDB.pm b/Master/tlpkg/TeXLive/TLPDB.pm
index b0235fd29c8..e2d4dbf516b 100644
--- a/Master/tlpkg/TeXLive/TLPDB.pm
+++ b/Master/tlpkg/TeXLive/TLPDB.pm
@@ -294,8 +294,8 @@ sub from_file {
tlwarn("unusable location $path, could not load any packages\n") if (!$found);
# remove the un-xz-ed tlpdb file from temp dir
# THAT IS RACY!!! we should fix that in some better way with tempfile
- unlink($tlpdbfile) if $tlpdbfile;
close($retfh);
+ unlink($tlpdbfile) if $tlpdbfile;
return($found);
}