--- a/test/Network/HTTP/ClientSpec.hs
+++ b/test/Network/HTTP/ClientSpec.hs
@@ -12,38 +12,4 @@ main :: IO ()
 main = hspec spec
 
 spec :: Spec
-spec = describe "Client" $ do
-    it "works" $ withSocketsDo $ do
-        req <- parseUrl "http://httpbin.org/"
-        man <- newManager defaultManagerSettings
-        res <- httpLbs req man
-        responseStatus res `shouldBe` status200
-
-    describe "method in URL" $ do
-        it "success" $ withSocketsDo $ do
-            req <- parseUrl "POST http://httpbin.org/post"
-            man <- newManager defaultManagerSettings
-            res <- httpLbs req man
-            responseStatus res `shouldBe` status200
-
-        it "failure" $ withSocketsDo $ do
-            req' <- parseUrl "PUT http://httpbin.org/post"
-            let req = req'
-                    { checkStatus = \_ _ _ -> Nothing
-                    }
-            man <- newManager defaultManagerSettings
-            res <- httpLbs req man
-            responseStatus res `shouldBe` status405
-
-    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
-
-    it "managerModifyRequestCheckStatus" $ do
-        let modify req = return req { checkStatus = \s hs cj -> Just $ toException $ StatusCodeException s hs cj }
-            settings = defaultManagerSettings { managerModifyRequest = modify }
-        withManager settings $ \man ->
-            httpLbs "http://httpbin.org" man `shouldThrow` anyException
+spec = return ()