summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorGravatar Joey Hess <joeyh@joeyh.name>2015-05-22 13:44:24 -0400
committerGravatar Joey Hess <joeyh@joeyh.name>2015-05-22 13:44:24 -0400
commit448e28fd4b960c648d203cb3b060dee9d401ae86 (patch)
treea80ee1d05b94103606f9f181011901f1b1e95ad2
parenta7fa2ac2a0e20f26db269cdb687a98a7b7bc72cf (diff)
fix windows build
-rw-r--r--Utility/LockPool/Windows.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/Utility/LockPool/Windows.hs b/Utility/LockPool/Windows.hs
index 2537863e2..2206e05e4 100644
--- a/Utility/LockPool/Windows.hs
+++ b/Utility/LockPool/Windows.hs
@@ -30,7 +30,7 @@ import Prelude
lockShared :: LockFile -> IO (Maybe LockHandle)
lockShared file = tryMakeLockHandle
(P.tryTakeLock P.lockPool file LockShared)
- (F.lockShared mode file)
+ (F.lockShared file)
{- Tries to take an exclusive lock on a file. Fails if another process has
- a shared or exclusive lock.