summaryrefslogtreecommitdiff
path: root/Command/WebApp.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2012-07-26 18:04:09 -0400
committerGravatar Joey Hess <joey@kitenet.net>2012-07-26 18:04:09 -0400
commit9b2eec2e7af34e107bcb438a501286996fe0eb41 (patch)
treedd82ba7cc1d434f055abef1d4bdf32bfe5d0eb0a /Command/WebApp.hs
parent9fd03c65f9ebee437317a21e27afb600d9815209 (diff)
increase timeout from 10 to 100 seconds
I've seen 10 be too short under load.
Diffstat (limited to 'Command/WebApp.hs')
-rw-r--r--Command/WebApp.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/Command/WebApp.hs b/Command/WebApp.hs
index 5fcaad6fd..7d0a310d4 100644
--- a/Command/WebApp.hs
+++ b/Command/WebApp.hs
@@ -56,7 +56,7 @@ start restart = notBareRepo $ do
state <- Annex.getState id
liftIO $ void $ forkProcess $
Annex.eval state $ startDaemon True False
- waitdaemon f (100 :: Int)
+ waitdaemon f (1000 :: Int)
waitdaemon _ 0 = error "failed to start git-annex assistant"
waitdaemon f n = unlessM (checkpid f) $ do
-- wait 0.1 seconds before retry