diff options
| author |  Joey Hess <joey@kitenet.net> | 2014-07-16 16:16:25 -0400 |
|---|---|---|
| committer | Joey Hess <joey@kitenet.net> | 2014-07-16 16:16:25 -0400 |
| commit | 6014d63df5a904facfc187db8859d4eb14001f67 (patch) | |
| tree | 47c3efcd30e314836dbbdd8817b3e1f8efc9735e | |
| parent | 8d9892f7fe0cba8b3c0b14aa6897acef93e52f91 (diff) | |
increase sleep
| -rw-r--r-- | Utility/ThreadScheduler.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Utility/ThreadScheduler.hs b/Utility/ThreadScheduler.hs index 104032c15..e6a81aebd 100644 --- a/Utility/ThreadScheduler.hs +++ b/Utility/ThreadScheduler.hs @@ -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 $ |