stripe-haskell 0.1.0.6 → 0.1.1.0

raw patch · 5 files changed

+13/−10 lines, 5 filesPVP: major bump suggested

API removals or changes: PVP suggests a major version bump

API changes (from Hackage documentation)

Files

• src/Web/Stripe/Client/Internal.hs +5/−2
• src/Web/Stripe/Customer.hs +4/−4
• src/Web/Stripe/Plan.hs +2/−1
• src/Web/Stripe/Types.hs +1/−1
• stripe-haskell.cabal +1/−2

@@ -1,11 +1,14 @@ {-# LANGUAGE OverloadedStrings #-} {-# LANGUAGE RecordWildCards   #-}--- |+------------------------------------------------------------------------------+-- |  -- Module      : Web.Stripe.Client.Internal -- Copyright   : (c) David Johnson, 2014 -- Maintainer  : djohnson.m@gmail.com -- Stability   : experimental -- Portability : POSIX+-- | +------------------------------------------------------------------------------ module Web.Stripe.Client.Internal     ( callAPI     , stripe@@ -41,7 +44,7 @@ import           Web.Stripe.Client.Types    (APIVersion (..), Stripe,                                              StripeConfig (..),                                              StripeRequest (..))-import           Web.Stripe.Client.Util     (fromSeconds, getParams,+import           Web.Stripe.Client.Util     (fromSeconds, getParams, toSeconds,                                              paramsToByteString, toBytestring,                                              toExpandable, toMetaData, toText,                                              toTextLower, (</>))

@@ -56,15 +56,15 @@     , PlanId             (..)     , Quantity           (..)     , StripeDeleteResult (..)+    , TrialPeriod        (..)     , Description     , AccountBalance-    , TrialPeriod     , Limit     ) where  import           Web.Stripe.Client.Internal (Method (GET, POST, DELETE), Stripe,                                              StripeRequest (..), callAPI, toMetaData,-                                             getParams, toText, (</>), toExpandable)+                                             toSeconds, getParams, toText, (</>), toExpandable) import           Web.Stripe.Types           (AccountBalance, CVC (..),                                              CardId (..), CardNumber (..),                                              CouponId (..), Customer (..),@@ -75,7 +75,7 @@                                              StartingAfter,                                              StripeDeleteResult (..),                                              StripeList (..), TokenId (..),-                                             TrialPeriod, ExpandParams)+                                             TrialPeriod(..), ExpandParams) import           Web.Stripe.Types.Util  ------------------------------------------------------------------------------@@ -122,7 +122,7 @@                    , ("email", (\(Email x) -> x) `fmap` email)                    , ("plan", (\(PlanId x) -> x) `fmap` planId)                    , ("quantity",  (\(Quantity x) -> toText x) `fmap` quantity)-                   , ("trial_end", toText `fmap` trialEnd)+                   , ("trial_end", (\(TrialPeriod x) -> toText $ toSeconds x) `fmap` trialEnd)                 ]  ------------------------------------------------------------------------------

@@ -48,6 +48,7 @@     , TrialPeriodDays    (..)     , StripeDeleteResult (..)     , Currency           (..)+    , Email              (..)     , Limit     , StartingAfter     , EndingBefore@@ -62,7 +63,7 @@                                              StripeRequest(..), toTextLower, (</>))  import           Web.Stripe.Types (PlanId (..) , Plan (..), Interval (..), StripeList(..),-                                   IntervalCount (..), TrialPeriodDays (..), Limit,+                                   IntervalCount (..), TrialPeriodDays (..), Limit, Email (..),                                    StartingAfter, EndingBefore, StripeDeleteResult(..),                                    Currency (..), Name, Amount, Description, MetaData) 

@@ -499,7 +499,7 @@  ------------------------------------------------------------------------------ -- | `TrialPeriod` for a Plan-type TrialPeriod = UTCTime+newtype TrialPeriod = TrialPeriod UTCTime deriving (Show, Eq)  ------------------------------------------------------------------------------ -- | Interval for `Plan`s

@@ -1,5 +1,5 @@ name:                stripe-haskell-version:             0.1.0.6+version:             0.1.1.0 synopsis:            Stripe API for Haskell license:             MIT license-file:        LICENSE@@ -131,7 +131,6 @@                      , http-streams                      , io-streams                      , mtl >= 2.1.3.1-                     , random                      , text                      , time                      , transformers