mirrors/git-annex
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages 1 Wiki Activity Actions

update comment to current status

Browse source
This commit is contained in:
Joey Hess 2021-12-03 18:41:51 -04:00
parent 9d3dce94f0
commit e464ffd641
No known key found for this signature in database
GPG key ID: DB12DB0FF05F8F38
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
Utility/LockFile/PidLock.hs
View file

@ -279,7 +279,7 @@ waitedLock (Seconds timeout) lockfile displaymessage = do
giveup $ "Gave up waiting for pid lock file " ++ fromRawFilePath lockfile giveup $ "Gave up waiting for pid lock file " ++ fromRawFilePath lockfile
-- | Use when the pid lock has already been taken by another thread of the -- | Use when the pid lock has already been taken by another thread of the
-- same process, or perhaps is in the process of being taken. -- same process.
alreadyLocked :: MonadIO m => LockFile -> m LockHandle alreadyLocked :: MonadIO m => LockFile -> m LockHandle
alreadyLocked lockfile = liftIO $ do alreadyLocked lockfile = liftIO $ do
abslockfile <- absPath lockfile abslockfile <- absPath lockfile