comment typo fix
This commit is contained in:
parent
3e91cd13ba
commit
f219ffc33b
1 changed files with 1 additions and 1 deletions
|
@ -201,7 +201,7 @@ checkInsaneLustre dest = do
|
||||||
--
|
--
|
||||||
-- Uses a 1 second wait-loop.
|
-- Uses a 1 second wait-loop.
|
||||||
--
|
--
|
||||||
-- May wait untie timeout if the lock file is stale and is on a network file
|
-- May wait until timeout if the lock file is stale and is on a network file
|
||||||
-- system, or on a system where the side lock cannot be taken.
|
-- system, or on a system where the side lock cannot be taken.
|
||||||
waitLock :: Seconds -> LockFile -> IO LockHandle
|
waitLock :: Seconds -> LockFile -> IO LockHandle
|
||||||
waitLock (Seconds timeout) lockfile = go timeout
|
waitLock (Seconds timeout) lockfile = go timeout
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue