diff options
author | Joey Hess <joey@kitenet.net> | 2013-08-04 13:54:09 -0400 |
---|---|---|
committer | Joey Hess <joey@kitenet.net> | 2013-08-04 14:05:36 -0400 |
commit | 8d2f003c63e0c1db0758e06f02b999365f8413a9 (patch) | |
tree | 1d8dbda0065630a5b1f153249ea12ce17e4e68e0 /Remote | |
parent | 6db0c4414a0afee7118a9193800b627c40968fa1 (diff) |
avoid more build warnings on Windows
Diffstat (limited to 'Remote')
-rw-r--r-- | Remote/Helper/Hooks.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/Remote/Helper/Hooks.hs b/Remote/Helper/Hooks.hs index 96081b024..7c2bf68ca 100644 --- a/Remote/Helper/Hooks.hs +++ b/Remote/Helper/Hooks.hs @@ -73,8 +73,8 @@ runHooks r starthook stophook a = do run starthook Annex.addCleanup (remoteid ++ "-stop-command") $ runstop lck - runstop lck = do #ifndef __WINDOWS__ + runstop lck = do -- Drop any shared lock we have, and take an -- exclusive lock, without blocking. If the lock -- succeeds, we're the only process using this remote, @@ -90,5 +90,5 @@ runHooks r starthook stophook a = do Right _ -> run stophook liftIO $ closeFd fd #else - run stophook + runstop _lck = run stophook #endif |