stripe-haskell 0.1.3.1 → 0.1.4.0
raw patch · 2 files changed
+6/−7 lines, 2 filesPVP ok
version bump matches the API change (PVP)
API changes (from Hackage documentation)
Files
src/Web/Stripe/Client/Internal.hs view
@@ -33,9 +33,9 @@ import qualified Data.Text as T import Network.Http.Client (Connection, Method (..), baselineContextSSL, buildRequest,- closeConnection, concatHandler, - getStatusCode, http,- inputStreamBody, openConnectionSSL,+ closeConnection, concatHandler,+ encodedFormBody, getStatusCode,+ http, openConnectionSSL, receiveResponse, sendRequest, setAuthorizationBasic, setContentType, setHeader)@@ -102,7 +102,7 @@ callAPI StripeRequest{..} = do (StripeConfig{..}, conn) <- ask let reqBody | method == GET = mempty- | otherwise = paramsToByteString queryParams+ | otherwise = queryParams reqURL | method == GET = S.concat [ T.encodeUtf8 endpoint , "?"@@ -116,8 +116,7 @@ setContentType "application/x-www-form-urlencoded" setHeader "Stripe-Version" (toBytestring V20141007) setHeader "Connection" "Keep-Alive"- body <- Streams.fromByteString reqBody- sendRequest conn req $ inputStreamBody body+ sendRequest conn req $ encodedFormBody reqBody receiveResponse conn $ \response inputStream -> do when debug $ print response result <- concatHandler response inputStream
stripe-haskell.cabal view
@@ -1,5 +1,5 @@ name: stripe-haskell-version: 0.1.3.1+version: 0.1.4.0 synopsis: Stripe API for Haskell license: MIT license-file: LICENSE