test/test-io.hs: Adapt to exception type change

Author: erikd

test/test-io.hs

@@ -143,7 +143,7 @@ requestTest = describe "Request:" $ do
             -- Getting a TlsException shows that we have successfully upgraded
             -- from HTTP to HTTPS. Its not possible to ignore this failure
             -- because its made by the http-conduit inside the proxy.
-            BS.take 13 (resultBS result) `shouldBe` "HttpException"
+            BS.takeWhile (/= ' ') (resultBS result) `shouldBe` "TlsExceptionHostPort"
     it "Can provide a proxy Response." $
         withTestProxy proxySettingsProxyResponse $ \ testProxyPort -> do
             req <- addTestProxy testProxyPort <$> mkGetRequest Http "/whatever"