summaryrefslogtreecommitdiff
path: root/Master/tlpkg
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2014-05-05 23:00:01 +0000
committerKarl Berry <karl@freefriends.org>2014-05-05 23:00:01 +0000
commitaf2c4ad6d1402a91ed33461fb19c06503038ed8b (patch)
tree280e60c03ab7a3d6e4807689d39b3fe073fcf2a3 /Master/tlpkg
parent3372e050b51026c8498ec0c30020907bf2608dcc (diff)
(install_packages): use select(), not Time::HiRes,
which is not installed with the system Perl in CentOS 6, at least. git-svn-id: svn://tug.org/texlive/trunk@33866 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/tlpkg')
-rw-r--r--Master/tlpkg/TeXLive/TLUtils.pm3
1 files changed, 1 insertions, 2 deletions
diff --git a/Master/tlpkg/TeXLive/TLUtils.pm b/Master/tlpkg/TeXLive/TLUtils.pm
index df3a31564d3..9fcc0295b62 100644
--- a/Master/tlpkg/TeXLive/TLUtils.pm
+++ b/Master/tlpkg/TeXLive/TLUtils.pm
@@ -201,7 +201,6 @@ use Cwd;
use Digest::MD5;
use Getopt::Long;
use File::Temp;
-use Time::HiRes;
use TeXLive::TLConfig;
@@ -1411,7 +1410,7 @@ sub install_packages {
# The open might fail for no good reason on Windows.
# Try again for a while, but not forever.
if ($count++ == 100) { die "$0: open($tlpobj_file) failed: $!"; }
- Time::HiRes::sleep(0.01); # sleep briefly
+ select (undef, undef, undef, .1); # sleep briefly
}
$tlpobj->writeout(\*TMP);
close(TMP);