avoid more build warnings on Windows
This commit is contained in:
parent
fc96861084
commit
a3224ce35b
12 changed files with 29 additions and 20 deletions
|
@ -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
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue