summaryrefslogtreecommitdiff
path: root/Utility/LockPool/PidLock.hs
diff options
context:
space:
mode:
Diffstat (limited to 'Utility/LockPool/PidLock.hs')
-rw-r--r--Utility/LockPool/PidLock.hs3
1 files changed, 0 insertions, 3 deletions
diff --git a/Utility/LockPool/PidLock.hs b/Utility/LockPool/PidLock.hs
index 3d90e4b42..dc796b961 100644
--- a/Utility/LockPool/PidLock.hs
+++ b/Utility/LockPool/PidLock.hs
@@ -53,9 +53,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