lix-project/lix
20
55
Fork 31
Code Issues 344 Code Review (Gerrit) Projects 3 Releases Wiki Activity

* Doh! The scope of $slotLock should extend to the end of the script,

Browse source 
because otherwise the lock will be released at the end of the while
  loop.
This commit is contained in:
Eelco Dolstra 2010-02-04 02:18:29 +00:00
parent c9b2d80bcd
commit 7ec5a65925
1 changed files with 2 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
scripts/build-remote.pl.in
View file

@ -94,6 +94,7 @@ sub openSlotLock {
my $hostName; my $hostName;
my $slotLock;
while (1) { while (1) {
@ -164,7 +165,7 @@ while (1) {
my $selected = $available[0]; my $selected = $available[0];
my $machine = $selected->{machine}; my $machine = $selected->{machine};
my $slotLock = openSlotLock($machine, $selected->{free}); $slotLock = openSlotLock($machine, $selected->{free});
flock($slotLock, LOCK_EX | LOCK_NB) or die; flock($slotLock, LOCK_EX | LOCK_NB) or die;
utime undef, undef, $slotLock; utime undef, undef, $slotLock;