diff options
author | sternenseemann <sternenseemann@systemli.org> | 2023-09-03 21:56:38 +0200 |
---|---|---|
committer | sternenseemann <sternenseemann@systemli.org> | 2023-09-03 21:56:38 +0200 |
commit | 71cbb538a5b9cb6b69cea6f0c386f29b5f5a5f2e (patch) | |
tree | b1eeece31608dd533e224639e4caddbc0d9361f7 /maintainers/scripts/haskell | |
parent | 76dc15354424f88c38124d5467b18dd5476ecc40 (diff) |
maintainers/haskell/hydra-report.hs: increase timeout to 15min
This seems to be the server side Hydra timeout as well, so it makes sense waiting as long as Hydra will try to give a response.
Diffstat (limited to 'maintainers/scripts/haskell')
-rwxr-xr-x | maintainers/scripts/haskell/hydra-report.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/maintainers/scripts/haskell/hydra-report.hs b/maintainers/scripts/haskell/hydra-report.hs index 68ba75452d438..0b8ca6bd1f46d 100755 --- a/maintainers/scripts/haskell/hydra-report.hs +++ b/maintainers/scripts/haskell/hydra-report.hs @@ -187,7 +187,7 @@ getBuildReports opt = runReq defaultHttpConfig do getEvalBuilds :: HydraSlownessWorkaroundFlag -> Int -> Req (Seq Build) getEvalBuilds NoHydraSlownessWorkaround id = - hydraJSONQuery (responseTimeout 600000000) ["eval", showT id, "builds"] + hydraJSONQuery (responseTimeout 900000000) ["eval", showT id, "builds"] getEvalBuilds HydraSlownessWorkaround id = do Eval{builds} <- hydraJSONQuery mempty [ "eval", showT id ] forM builds $ \buildId -> do |