forked from lix-project/lix
This commit is contained in:
parent
86408b3f47
commit
e1df4ef73c
|
@ -152,6 +152,7 @@ my $machine = $selected->{machine};
|
||||||
|
|
||||||
my $slotLock = openSlotLock($machine, $selected->{free});
|
my $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;
|
||||||
|
|
||||||
close MAINLOCK;
|
close MAINLOCK;
|
||||||
|
|
||||||
|
|
Loading…
Reference in a new issue