summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-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);