yesod-mangopay 1.9.1 → 1.9.2

raw patch · 2 files changed

+7/−7 lines, 2 filesdep ~aesondep ~fast-loggerdep ~wai-logger

Dependency ranges changed: aeson, fast-logger, wai-logger

Files

• app/Handler/Transaction.hs +2/−2
• yesod-mangopay.cabal +5/−5

@@ -151,10 +151,11 @@ -- | payin form payinInForm :: [Card] -> [Wallet] -> Html -> MForm Handler (FormResult PayIn, Widget) payinInForm cards wallets= renderDivs $ PayIn-  <$> areq (selectFieldList (map (cAlias &&& cId) cards)) (localizedFS MsgPayInCard) Nothing+  <$> areq (selectFieldList (map (cardTitle &&& cId) cards)) (localizedFS MsgPayInCard) Nothing   <*> areq (selectFieldList (map (wDescription &&& (fromJust . wId)) wallets)) (localizedFS MsgPayInWallet) Nothing   <*> areq intField (localizedFS MsgPayInAmount) Nothing   <*> areq (selectFieldList (map (id &&& id) supportedCurrencies)) (localizedFS MsgPayInCurrency) Nothing+  where cardTitle c = cAlias c <> " (" <> cCurrency c <> ")"  -- | data necessary for transfer data MPTransfer= MPTransfer WalletId WalletId Integer Currency@@ -177,4 +178,3 @@   <*> areq (selectFieldList (map ((pack . show . baDetails) &&& (fromJust . baId)) accounts)) (localizedFS MsgPayOutAccount) Nothing   <*> areq intField (localizedFS MsgPayOutAmount) Nothing   <*> areq (selectFieldList (map (id &&& id) supportedCurrencies)) (localizedFS MsgPayOutCurrency) Nothing-

@@ -1,5 +1,5 @@ name:           yesod-mangopay-version:        1.9.1+version:        1.9.2 cabal-version:  >= 1.8 build-type:     Simple author:         JP Moresmau <jpmoresmau@gmail.com>@@ -95,11 +95,11 @@                  base, containers, http-conduit, mangopay, text,                  time, yesod, yesod-core                  , yesod-mangopay-                 , aeson                         >= 0.6        && < 0.8+                 , aeson                         >= 0.6        && < 0.9                  , bytestring                    >= 0.9        && < 0.11                  , data-default                  , directory                     >= 1.1        && < 1.3-                 , fast-logger                   >= 2.1.4      && < 2.2+                 , fast-logger                   >= 2.1.4      && < 2.3                  , hamlet                  , hjsmin                        >= 0.1        && < 0.2                  , monad-control                 >= 0.3        && < 0.4@@ -115,14 +115,14 @@                  , template-haskell                  , wai                           >= 2.1        && < 3.1                  , wai-extra-                 , wai-logger                    >= 2.1        && < 2.2+                 , wai-logger                    >= 2.1        && < 2.3                  , warp                          >= 2.1        && < 3.1                  , yaml                          >= 0.8        && < 0.9                  , yesod-auth                    >= 1.2.6                  , yesod-form                    >= 1.3.0      && < 1.4                  , yesod-persistent                  , yesod-static                  >= 1.2        && < 1.3-                 , lifted-base                   >=0.2.2 && <0.3+                 , lifted-base                   >=0.2.2       && <0.3                  , country-codes                 == 0.1.*     if flag(conduit11)       build-depends: