summaryrefslogtreecommitdiff
path: root/Annex/LockFile.hs
diff options
context:
space:
mode:
Diffstat (limited to 'Annex/LockFile.hs')
-rw-r--r--Annex/LockFile.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/Annex/LockFile.hs b/Annex/LockFile.hs
index 7a5c4b0e1..bd581fd5f 100644
--- a/Annex/LockFile.hs
+++ b/Annex/LockFile.hs
@@ -37,7 +37,7 @@ lockFileShared file = go =<< fromLockPool file
mode <- annexFileMode
lockhandle <- liftIO $ noUmask mode $
openFd file ReadOnly (Just mode) defaultFileFlags
- setFdOption lockhandle CloseOnExec True
+ liftIO $ setFdOption lockhandle CloseOnExec True
liftIO $ waitToSetLock lockhandle (ReadLock, AbsoluteSeek, 0, 0)
#else
lockhandle <- liftIO $ waitToLock $ lockShared file