diff options
author | Clint Adams <clint@debian.org> | 2015-06-27 03:08:19 +0300 |
---|---|---|
committer | Clint Adams <clint@debian.org> | 2015-06-27 03:08:19 +0300 |
commit | 6c0259f1c563e594022fd56141730e64932bf3f2 (patch) | |
tree | 4181f4e8dbc70ae032cfd7965e5d566d7c5f6ae7 /p/haskell-http-client/debian/patches/disable-external-network-connection-test.diff | |
parent | 9b8b4c3274be94c42f31d390da4450647eb3b4b6 (diff) | |
download | DHG_packages-6c0259f1c563e594022fd56141730e64932bf3f2.tar.gz |
haskell-http-client: New upstream version 0.4.13.
Diffstat (limited to 'p/haskell-http-client/debian/patches/disable-external-network-connection-test.diff')
-rw-r--r-- | p/haskell-http-client/debian/patches/disable-external-network-connection-test.diff | 18 |
1 files changed, 12 insertions, 6 deletions
diff --git a/p/haskell-http-client/debian/patches/disable-external-network-connection-test.diff b/p/haskell-http-client/debian/patches/disable-external-network-connection-test.diff index acbd51904..a201e4bef 100644 --- a/p/haskell-http-client/debian/patches/disable-external-network-connection-test.diff +++ b/p/haskell-http-client/debian/patches/disable-external-network-connection-test.diff @@ -1,14 +1,20 @@ --- a/test/Network/HTTP/ClientSpec.hs +++ b/test/Network/HTTP/ClientSpec.hs -@@ -55,11 +55,6 @@ +@@ -11,16 +11,4 @@ + main = hspec spec spec :: Spec - spec = describe "Client" $ do +-spec = describe "Client" $ do - it "works" $ withSocketsDo $ do -- req <- parseUrl "http://www.yesodweb.com/" +- req <- parseUrl "http://httpbin.org/" - man <- newManager defaultManagerSettings - res <- httpLbs req man - responseStatus res `shouldBe` status200 - describe "fails on empty hostnames #40" $ do - let test url = it url $ do - req <- parseUrl url +- +- it "managerModifyRequest" $ do +- let modify req = return req { port = 80 } +- settings = defaultManagerSettings { managerModifyRequest = modify } +- withManager settings $ \man -> do +- res <- httpLbs "http://httpbin.org:1234" man +- responseStatus res `shouldBe` status200 ++spec = return () |