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

refactor

Browse source
This commit is contained in:
Joey Hess 2015-11-12 16:35:15 -04:00
parent 0f25a7365a
commit 7bd9e33b84
Failed to extract signature
3 changed files with 7 additions and 7 deletions
Download patch file Download diff file Expand all files Collapse all files

3
Utility/LockPool/Posix.hs
View file

@ -67,9 +67,6 @@ getLockStatus file = P.getLockStatus P.lockPool file
(StatusLockedBy <$> getProcessID)
(F.getLockStatus file)
checkSaneLock :: LockFile -> LockHandle -> IO Bool
checkSaneLock lockfile (LockHandle _ flo) = fCheckSaneLock flo lockfile
mk :: F.LockHandle -> FileLockOps
mk h = FileLockOps
{ fDropLock = F.dropLock h