mirrors/git-annex
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages 1 Wiki Activity Actions

fix warning

Browse source
This commit is contained in:
Joey Hess 2013-05-26 16:02:55 -04:00
parent 129be9cf68
commit 62c368dd7c
1 changed files with 3 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
Utility/ThreadScheduler.hs
View file

@ -55,12 +55,12 @@ waitForTermination :: IO ()
waitForTermination = do
lock <- newEmptyMVar
#ifndef __WINDOWS__
let check sig lock = void $
let check sig = void $
installHandler sig (CatchOnce $ putMVar lock ()) Nothing
check softwareTermination lock
check softwareTermination
#ifndef __ANDROID__
whenM (queryTerminal stdInput) $
check keyboardSignal lock
check keyboardSignal
#endif
#endif
takeMVar lock