http-reverse-proxy 0.5.0 → 0.5.0.1

raw patch · 3 files changed

+11/−2 lines, 3 filesPVP ok

version bump matches the API change (PVP)

API changes (from Hackage documentation)

Files

• ChangeLog.md +4/−0
• http-reverse-proxy.cabal +1/−1
• test/main.hs +6/−1

@@ -1,3 +1,7 @@+## 0.5.0.1++* Support http-conduit 2.3 in test suite [#26](https://github.com/fpco/http-reverse-proxy/issues/26)+ ## 0.5.0  * update `wpsProcessBody` to accept response's initial request

@@ -1,5 +1,5 @@ name:                http-reverse-proxy-version:             0.5.0+version:             0.5.0.1 synopsis:            Reverse proxy HTTP requests, either over raw sockets or with WAI description:         Provides a simple means of reverse-proxying HTTP requests. The raw approach uses the same technique as leveraged by keter, whereas the WAI approach performs full request/response parsing via WAI and http-conduit. homepage:            https://github.com/fpco/http-reverse-proxy

@@ -1,3 +1,4 @@+{-# LANGUAGE CPP                 #-} {-# LANGUAGE OverloadedStrings   #-} {-# LANGUAGE ScopedTypeVariables #-} import           Blaze.ByteString.Builder     (fromByteString)@@ -86,7 +87,7 @@         (const $ takeMVar baton >> f port)  withMan :: (HC.Manager -> IO ()) -> IO ()-withMan = HC.withManager . (liftIO .)+withMan = (HC.newManager HC.tlsManagerSettings >>=)  main :: IO () main = hspec $@@ -125,7 +126,11 @@                     req <- HC.parseUrl $ "http://127.0.0.1:" ++ show port2                     mbs <- runResourceT $ timeout 1000000 $ do                         res <- HC.http req manager+#if MIN_VERSION_http_conduit(1, 3, 0)+                        HC.responseBody res $$ await+#else                         HC.responseBody res $$+- await+#endif                     mbs `shouldBe` Just (Just "hello")         it "passes on body length" $             let app req f = f $ responseLBS