summaryrefslogtreecommitdiff
path: root/Remote/Helper
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2014-08-20 11:51:47 -0400
committerGravatar Joey Hess <joey@kitenet.net>2014-08-20 11:51:47 -0400
commit07505caecbf5ef89050fc701c41fea92ac569e77 (patch)
tree1d0eabca225ce4988b58c6798b3b1bf5243f2de6 /Remote/Helper
parentb44e74ace2d74954c503930b9edb75d0aa9d7b52 (diff)
forgot some lifts
Diffstat (limited to 'Remote/Helper')
-rw-r--r--Remote/Helper/Hooks.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/Remote/Helper/Hooks.hs b/Remote/Helper/Hooks.hs
index 150e9efd2..cd31a2fd5 100644
--- a/Remote/Helper/Hooks.hs
+++ b/Remote/Helper/Hooks.hs
@@ -86,7 +86,7 @@ runHooks r starthook stophook a = do
mode <- annexFileMode
fd <- liftIO $ noUmask mode $
openFd lck ReadWrite (Just mode) defaultFileFlags
- setFdOption fd CloseOnExec True
+ liftIO $ setFdOption fd CloseOnExec True
v <- liftIO $ tryIO $
setLock fd (WriteLock, AbsoluteSeek, 0, 0)
case v of