nrabulinski/lix
0
0
Fork 0
forked from lix-project/lix
Code Pull requests 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;