mirror of
https://github.com/gentoo-mirror/gentoo.git
synced 2026-07-31 10:58:21 -07:00
39 lines
1.9 KiB
Diff
39 lines
1.9 KiB
Diff
From: hololeap <hololeap@protonmail.com>
|
|
Date: Sat, 9 Mar 2024 15:37:16 -0700
|
|
Subject: [PATCH 1/1] Disable network tests
|
|
|
|
Signed-off-by: hololeap <hololeap@protonmail.com>
|
|
--- a/http-client.cabal
|
|
+++ b/http-client.cabal
|
|
@@ -83,6 +83,7 @@ library
|
|
default-language: Haskell2010
|
|
|
|
test-suite spec
|
|
+ buildable: False
|
|
main-is: Spec.hs
|
|
type: exitcode-stdio-1.0
|
|
hs-source-dirs: test
|
|
--- a/test-nonet/Network/HTTP/ClientSpec.hs
|
|
+++ b/test-nonet/Network/HTTP/ClientSpec.hs
|
|
@@ -198,7 +198,7 @@ spec = describe "Client" $ do
|
|
print $ map (requestHeaders . fst) $ hrRedirects hr
|
|
mapM_ (\r -> requestHeaders r `shouldBe` []) $
|
|
map fst $ tail $ hrRedirects hr
|
|
- it "does strips header on redirect, if hosts are different and set to strip them if host differ" $ redirectServerToDifferentHost (Just 1) $ \port -> do
|
|
+ when False $ it "does strips header on redirect, if hosts are different and set to strip them if host differ" $ redirectServerToDifferentHost (Just 1) $ \port -> do
|
|
req' <- parseUrlThrow $ "http://127.0.0.1:" ++ show port
|
|
let req = req' { requestHeaders = [(hAuthorization, "abguvatgbfrrurer")]
|
|
, redirectCount = 10
|
|
@@ -210,7 +210,7 @@ spec = describe "Client" $ do
|
|
print $ map (requestHeaders . fst) $ hrRedirects hr
|
|
mapM_ (\r -> requestHeaders r `shouldBe` []) $
|
|
map fst $ tail $ hrRedirects hr
|
|
- it "does NOT strips header on redirect, if hosts are same and set to strip them if host differ" $ redirectServerToDifferentHost (Just 1) $ \port -> do
|
|
+ when False $ it "does NOT strips header on redirect, if hosts are same and set to strip them if host differ" $ redirectServerToDifferentHost (Just 1) $ \port -> do
|
|
req' <- parseUrlThrow $ "http://127.0.0.1:" ++ show port
|
|
let req = req' { requestHeaders = [(hAuthorization, "abguvatgbfrrurer")]
|
|
, redirectCount = 10
|
|
--
|
|
2.43.0
|
|
|