haxr 3000.11.1.5 → 3000.11.1.6

raw patch · 3 files changed

+8/−4 lines, 3 filesPVP ok

version bump matches the API change (PVP)

API changes (from Hackage documentation)

Files

• CHANGES +4/−0
• Network/XmlRpc/Client.hs +3/−3
• haxr.cabal +1/−1

@@ -1,3 +1,7 @@+* 3000.11.1.6 (30 May 2016)++  - bug fix: default port is now 80 or 443 based on protocol+ * 3000.11.1.5 (13 May 2016)    - bug fix in parsing username & password from URI

@@ -165,14 +165,14 @@ post_ :: URI -> URIAuth -> HeadersAList -> BSL.ByteString -> IO U.ByteString post_ uri auth headers content = withOpenSSL $ do     let hostname = BS.pack (uriRegName auth)-        port     = fromMaybe 443 (readMaybe $ drop 1 $ uriPort auth)+        port base = fromMaybe base (readMaybe $ drop 1 $ uriPort auth)      c <- case init $ uriScheme uri of         "http"  ->-            openConnection hostname port+            openConnection hostname (port 80)         "https" -> do             ctx <- baselineContextSSL-            openConnectionSSL ctx hostname port+            openConnectionSSL ctx hostname (port 443)         x -> fail ("Unknown scheme: '" ++ x ++ "'!")      req  <- request uri auth headers (BSL.length content)

@@ -1,5 +1,5 @@ Name: haxr-Version: 3000.11.1.5+Version: 3000.11.1.6 Cabal-version: >=1.10 Build-type: Simple Copyright: Bjorn Bringert, 2003-2006