Merge pull request #114 from NoRedInk/nri-http-fix-timeout-in-microse…

…conds nri-http: fix timeout value in microseconds
NoRedInk · Oct 21, 2024 · 85b84bf · 85b84bf
2 parents 5facaac + b09cd6a
commit 85b84bf
Showing 1 changed file with 1 addition and 2 deletions.
diff --git a/nri-http/src/Http.hs b/nri-http/src/Http.hs
@@ -218,8 +218,7 @@ _request doAnythingHandler manager settings = do
  HTTP.requestBody = HTTP.RequestBodyLBS <| Internal.bodyContents (Internal.body settings),
  HTTP.responseTimeout =
  Internal.timeout settings
- |> Maybe.withDefault (30 * 1000)
- |> (*) 1000
+ |> Maybe.withDefault (30 * 1000 * 1000)
  |> fromIntegral
  |> HTTP.responseTimeoutMicro
  }