diff options
author | Norbert Preining <preining@logic.at> | 2019-11-16 02:22:41 +0000 |
---|---|---|
committer | Norbert Preining <preining@logic.at> | 2019-11-16 02:22:41 +0000 |
commit | dcb59d7d93c1252cb5dffb33099ed4bffc27fabc (patch) | |
tree | e283a6d18d8b5f22d245a04e02474ab3aa23cf54 | |
parent | 01c7e922580ef251c4126aaecf1b4eaf415d86b0 (diff) |
correct Perl module calls
git-svn-id: svn://tug.org/texlive/trunk@52815 c570f23f-e606-0410-a88d-b1316a301751
-rw-r--r-- | Master/tlpkg/TeXLive/TLUtils.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/Master/tlpkg/TeXLive/TLUtils.pm b/Master/tlpkg/TeXLive/TLUtils.pm index acdc9884f0b..e1d1f0ef3b1 100644 --- a/Master/tlpkg/TeXLive/TLUtils.pm +++ b/Master/tlpkg/TeXLive/TLUtils.pm @@ -2183,7 +2183,7 @@ sub check_file_and_remove { if ($tlchecksum ne $checksum) { tlwarn("TLUtils::check_file: checksums differ for $xzfile:\n"); tlwarn("TLUtils::check_file: tlchecksum=$tlchecksum, arg=$checksum\n"); - (undef,$check_file_tmpdir) = File::temp::tempdir("tlcheckfileXXXXXXXX"); + (undef,$check_file_tmpdir) = File::Temp::tempdir("tlcheckfileXXXXXXXX"); tlwarn("TLUtils::check_file: removing $xzfile, " . "but saving copy in $check_file_tmpdir\n"); copy($xzfile, $check_file_tmpdir); @@ -2203,7 +2203,7 @@ sub check_file_and_remove { if (!defined($check_file_tmpdir)) { # the tmpdir should always be undefined, since we shouldn't get # here if the checksums failed, but test anyway. - $check_file_tmpdir = File::temp::tempdir("tlcheckfileXXXXXXXX"); + $check_file_tmpdir = File::Temp::tempdir("tlcheckfileXXXXXXXX"); tlwarn("TLUtils::check_file: saving copy in $check_file_tmpdir\n"); copy($xzfile, $check_file_tmpdir); } |