comment typo fix

This commit is contained in:
Joey Hess 2016-03-01 12:24:22 -04:00
parent 3e91cd13ba
commit f219ffc33b
Failed to extract signature

View file

@ -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