stripe-tests 2.5.0 → 2.6.0

raw patch · 22 files changed

+25/−7 lines, 22 filesdep ~hspecdep ~hspec-coredep ~time

Dependency ranges changed: hspec, hspec-core, time

Files

stripe-tests.cabal +4/−4
tests/Web/Stripe/Test/Account.hs +1/−2
tests/Web/Stripe/Test/AllTests.hs +1/−0
tests/Web/Stripe/Test/ApplicationFee.hs +1/−0
tests/Web/Stripe/Test/ApplicationFeeRefund.hs +1/−0
tests/Web/Stripe/Test/Balance.hs +1/−0
tests/Web/Stripe/Test/Card.hs +1/−0
tests/Web/Stripe/Test/Charge.hs +1/−0
tests/Web/Stripe/Test/Coupon.hs +1/−0
tests/Web/Stripe/Test/Customer.hs +1/−0
tests/Web/Stripe/Test/Discount.hs +1/−0
tests/Web/Stripe/Test/Dispute.hs +1/−0
tests/Web/Stripe/Test/Event.hs +1/−0
tests/Web/Stripe/Test/Invoice.hs +1/−0
tests/Web/Stripe/Test/InvoiceItem.hs +1/−0
tests/Web/Stripe/Test/Plan.hs +1/−0
tests/Web/Stripe/Test/Prelude.hs +1/−1
tests/Web/Stripe/Test/Recipient.hs +1/−0
tests/Web/Stripe/Test/Refund.hs +1/−0
tests/Web/Stripe/Test/Subscription.hs +1/−0
tests/Web/Stripe/Test/Token.hs +1/−0
tests/Web/Stripe/Test/Transfer.hs +1/−0

stripe-tests.cabal view

@@ -1,5 +1,5 @@ name:                stripe-tests-version:             2.5.0+version:             2.6.0 synopsis:            Tests for Stripe API bindings for Haskell license:             MIT license-file:        LICENSE@@ -28,11 +28,11 @@                      , free                 >= 4.10  && < 6                      , mtl                  >= 2.1.2 && < 2.3                      , random               >= 1.1   && < 1.2-                     , hspec                >= 2.1.0 && < 2.7-                     , hspec-core           >= 2.1.0 && < 2.7+                     , hspec                >= 2.1.0 && < 2.8+                     , hspec-core           >= 2.1.0 && < 2.8                      , stripe-core                      , text                 >= 1.0   && < 1.3-                     , time                 >= 1.4   && < 1.9+                     , time                 >= 1.4   && < 1.11                      , transformers         >= 0.3   && < 0.6                      , unordered-containers >= 0.2.5 && < 0.3

tests/Web/Stripe/Test/Account.hs view

@@ -12,7 +12,6 @@ accountTests stripe = do   describe "Account tests" $ do     it "Succesfully retrieves account information" $ do-      result <- stripe $ do d <- getAccountDetails             +      result <- stripe $ do d <- getAccountDetails                             return d       result `shouldSatisfy` isRight-

tests/Web/Stripe/Test/AllTests.hs view

@@ -1,6 +1,7 @@ {-# LANGUAGE OverloadedStrings #-} {-# LANGUAGE RankNTypes #-} {-# LANGUAGE RecordWildCards   #-}+{-# LANGUAGE RankNTypes #-} module Web.Stripe.Test.AllTests where  import           Test.Hspec                            (hspec)

tests/Web/Stripe/Test/ApplicationFee.hs view

@@ -1,5 +1,6 @@ {-# LANGUAGE OverloadedStrings #-} {-# LANGUAGE RebindableSyntax #-}+{-# LANGUAGE RankNTypes #-} module Web.Stripe.Test.ApplicationFee where  import Test.Hspec

tests/Web/Stripe/Test/ApplicationFeeRefund.hs view

@@ -1,6 +1,7 @@ {-# LANGUAGE OverloadedStrings #-} {-# LANGUAGE RebindableSyntax #-} {-# LANGUAGE RecordWildCards   #-}+{-# LANGUAGE RankNTypes #-} module Web.Stripe.Test.ApplicationFeeRefund where  import           Data.Either

tests/Web/Stripe/Test/Balance.hs view

@@ -1,5 +1,6 @@ {-# LANGUAGE OverloadedStrings #-} {-# LANGUAGE RebindableSyntax  #-}+{-# LANGUAGE RankNTypes #-} module Web.Stripe.Test.Balance where  import           Data.Either

tests/Web/Stripe/Test/Card.hs view

@@ -1,6 +1,7 @@ {-# LANGUAGE OverloadedStrings #-} {-# LANGUAGE RebindableSyntax  #-} {-# LANGUAGE RecordWildCards   #-}+{-# LANGUAGE RankNTypes #-} module Web.Stripe.Test.Card where  import           Data.Either

tests/Web/Stripe/Test/Charge.hs view

@@ -1,6 +1,7 @@ {-# LANGUAGE OverloadedStrings #-} {-# LANGUAGE RebindableSyntax  #-} {-# LANGUAGE RecordWildCards   #-}+{-# LANGUAGE RankNTypes #-} module Web.Stripe.Test.Charge where  import           Data.Either

tests/Web/Stripe/Test/Coupon.hs view

@@ -1,5 +1,6 @@ {-# LANGUAGE OverloadedStrings #-} {-# LANGUAGE RebindableSyntax #-}+{-# LANGUAGE RankNTypes #-} module Web.Stripe.Test.Coupon where  import           Data.Either

tests/Web/Stripe/Test/Customer.hs view

@@ -1,6 +1,7 @@ {-# LANGUAGE OverloadedStrings #-} {-# LANGUAGE RecordWildCards #-} {-# LANGUAGE RebindableSyntax #-}+{-# LANGUAGE RankNTypes #-} module Web.Stripe.Test.Customer where import           Data.Either import           Data.Maybe

tests/Web/Stripe/Test/Discount.hs view

@@ -1,6 +1,7 @@ {-# LANGUAGE RecordWildCards #-} {-# LANGUAGE OverloadedStrings #-} {-# LANGUAGE RebindableSyntax #-}+{-# LANGUAGE RankNTypes #-} module Web.Stripe.Test.Discount where  import           Data.Either

tests/Web/Stripe/Test/Dispute.hs view

@@ -1,6 +1,7 @@ {-# LANGUAGE OverloadedStrings #-} {-# LANGUAGE RebindableSyntax  #-} {-# LANGUAGE RecordWildCards   #-}+{-# LANGUAGE RankNTypes #-} module Web.Stripe.Test.Dispute where  import           Control.Concurrent      (threadDelay)

tests/Web/Stripe/Test/Event.hs view

@@ -1,5 +1,6 @@ {-# LANGUAGE OverloadedStrings #-} {-# LANGUAGE RebindableSyntax #-}+{-# LANGUAGE RankNTypes #-} module Web.Stripe.Test.Event where  import           Data.Either

tests/Web/Stripe/Test/Invoice.hs view

@@ -1,6 +1,7 @@ {-# LANGUAGE OverloadedStrings #-} {-# LANGUAGE RebindableSyntax  #-} {-# LANGUAGE RecordWildCards   #-}+{-# LANGUAGE RankNTypes #-} module Web.Stripe.Test.Invoice where  import           Data.Either

tests/Web/Stripe/Test/InvoiceItem.hs view

@@ -1,6 +1,7 @@ {-# LANGUAGE RecordWildCards #-} {-# LANGUAGE OverloadedStrings #-} {-# LANGUAGE RebindableSyntax #-}+{-# LANGUAGE RankNTypes #-} module Web.Stripe.Test.InvoiceItem where  import           Data.Either

tests/Web/Stripe/Test/Plan.hs view

@@ -1,5 +1,6 @@ {-# LANGUAGE OverloadedStrings #-} {-# LANGUAGE RebindableSyntax #-}+{-# LANGUAGE RankNTypes #-} module Web.Stripe.Test.Plan where  import           Data.Either   (Either(..), isRight)

tests/Web/Stripe/Test/Prelude.hs view

@@ -114,7 +114,7 @@ void :: (FromJSON (StripeReturn a)) => StripeRequest a -> Stripe () void req = M.void (stripeLift req) -fail :: (M.Monad m) => String -> m a+fail :: (M.MonadFail m) => String -> m a fail = M.fail  return :: (M.Monad m) => a -> m a

tests/Web/Stripe/Test/Recipient.hs view

@@ -1,6 +1,7 @@ {-# LANGUAGE OverloadedStrings #-} {-# LANGUAGE RecordWildCards #-} {-# LANGUAGE RebindableSyntax #-}+{-# LANGUAGE RankNTypes #-} module Web.Stripe.Test.Recipient where  import           Data.Either

tests/Web/Stripe/Test/Refund.hs view

@@ -1,6 +1,7 @@ {-# LANGUAGE OverloadedStrings #-} {-# LANGUAGE RebindableSyntax  #-} {-# LANGUAGE RecordWildCards   #-}+{-# LANGUAGE RankNTypes #-} module Web.Stripe.Test.Refund where  import           Data.Either

tests/Web/Stripe/Test/Subscription.hs view

@@ -1,6 +1,7 @@ {-# LANGUAGE RecordWildCards #-} {-# LANGUAGE OverloadedStrings #-} {-# LANGUAGE RebindableSyntax #-}+{-# LANGUAGE RankNTypes #-} module Web.Stripe.Test.Subscription where  import           Data.Either

tests/Web/Stripe/Test/Token.hs view

@@ -1,6 +1,7 @@ {-# LANGUAGE OverloadedStrings #-} {-# LANGUAGE RebindableSyntax  #-} {-# LANGUAGE RecordWildCards   #-}+{-# LANGUAGE RankNTypes #-} module Web.Stripe.Test.Token where  import           Data.Either

tests/Web/Stripe/Test/Transfer.hs view

@@ -1,6 +1,7 @@ {-# LANGUAGE RecordWildCards #-} {-# LANGUAGE OverloadedStrings #-} {-# LANGUAGE RebindableSyntax #-}+{-# LANGUAGE RankNTypes #-} module Web.Stripe.Test.Transfer where  import           Data.Maybe