fix windows build
This commit is contained in:
parent
1b01322de0
commit
696ed9b3f9
1 changed files with 1 additions and 1 deletions
|
@ -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.
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue