more windows build fix
This commit is contained in:
parent
2fca8e730f
commit
540a0343ba
1 changed files with 1 additions and 1 deletions
|
@ -108,7 +108,7 @@ runTransfer' ignorelock t file shouldretry transferobserver transferaction = do
|
|||
prep tfile _mode info = catchPermissionDenied (const prepfailed) $ do
|
||||
let lck = transferLockFile tfile
|
||||
createAnnexDirectory $ takeDirectory lck
|
||||
v <- catchMaybeIO $ lockExclusive lck
|
||||
v <- catchMaybeIO $ liftIO $ lockExclusive lck
|
||||
case v of
|
||||
Nothing -> return (Nothing, False)
|
||||
Just Nothing -> return (Nothing, True)
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue