increase sleep

This commit is contained in:
Joey Hess 2014-07-16 16:16:25 -04:00
parent cee75b0104
commit cf384cddfb

View file

@ -57,7 +57,7 @@ unboundDelay time = do
waitForTermination :: IO ()
waitForTermination = do
#ifdef mingw32_HOST_OS
forever $ threadDelaySeconds (Seconds 6)
forever $ threadDelaySeconds (Seconds 6000)
#else
lock <- newEmptyMVar
let check sig = void $