Drop delay between retrying locks from 1sec to 100ms and drop the overall timeout value from 60 secs to 10secs.

Bug #59454 r=bryner sr=alecf


git-svn-id: svn://10.0.0.236/trunk@102794 18797224-902f-48f8-a5cc-f745e15eee43
This commit is contained in:
cls%seawood.org
2001-09-12 06:34:06 +00:00
parent 8c6f8fdd2e
commit 9c104e0cdb

View File

@@ -37,8 +37,8 @@ BEGIN {
}
my $lockcounter = 0;
my $locklimit = 60;
my $locksleep = 1;
my $locklimit = 100;
my $locksleep = 0.1;
my %lockhash;
# File::Spec->rel2abs appears to be broken in ActiveState Perl 5.22
@@ -84,7 +84,7 @@ sub mozLock($) {
last;
}
$lockcounter++;
sleep($locksleep);
select(undef,undef,undef, $locksleep);
}
if ($lockcounter >= $locklimit) {
undef $lockhandle;