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
                 }