summaryrefslogtreecommitdiff
path: root/Utility/LockPool/PidLock.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joeyh@joeyh.name>2015-11-12 16:35:15 -0400
committerGravatar Joey Hess <joeyh@joeyh.name>2015-11-12 16:35:15 -0400
commitd94a72a381baf0e251db48844d27755d5f2c8f14 (patch)
treebb12b4ac1036db0f79d09d234490180b66288db0 /Utility/LockPool/PidLock.hs
parent0356f1b6e6d5905430e57eedf868095d13610b4c (diff)
refactor
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