packages feed

yesod-recaptcha2 0.2.3 → 0.2.4

raw patch · 2 files changed

+13/−9 lines, 2 filesPVP: major bump suggested

API removals or changes: PVP suggests a major version bump

API changes (from Hackage documentation)

- Yesod.ReCaptcha2: class YesodAuth site => YesodReCaptcha site where reCaptchaSiteKey = pure "6LeIxAcTAAAAAJcZVRqyHh71UMIEGNQ_MXjiZKhI" reCaptchaSecretKey = pure "6LeIxAcTAAAAAGG-vFI1TnRWxMZNFuojJ4WifJWe" reCaptchaLanguage = pure Nothing
+ Yesod.ReCaptcha2: class YesodAuth site => YesodReCaptcha site
- Yesod.ReCaptcha2: mReCaptcha :: YesodReCaptcha site => MForm (HandlerT site IO) (FormResult (), [FieldView site])
+ Yesod.ReCaptcha2: mReCaptcha :: YesodReCaptcha site => MForm (HandlerFor site) (FormResult (), [FieldView site])
- Yesod.ReCaptcha2: reCaptcha :: YesodReCaptcha site => AForm (HandlerT site IO) ()
+ Yesod.ReCaptcha2: reCaptcha :: YesodReCaptcha site => AForm (HandlerFor site) ()
- Yesod.ReCaptcha2: reCaptchaLanguage :: YesodReCaptcha site => HandlerT site IO (Maybe Text)
+ Yesod.ReCaptcha2: reCaptchaLanguage :: YesodReCaptcha site => HandlerFor site (Maybe Text)
- Yesod.ReCaptcha2: reCaptchaSecretKey :: YesodReCaptcha site => HandlerT site IO Text
+ Yesod.ReCaptcha2: reCaptchaSecretKey :: YesodReCaptcha site => HandlerFor site Text
- Yesod.ReCaptcha2: reCaptchaSiteKey :: YesodReCaptcha site => HandlerT site IO Text
+ Yesod.ReCaptcha2: reCaptchaSiteKey :: YesodReCaptcha site => HandlerFor site Text

Files

src/Yesod/ReCaptcha2.hs view
@@ -11,14 +11,14 @@  -- | default key is testing. you should impl reCaptchaSiteKey and reCaptchaSecretKey class YesodAuth site => YesodReCaptcha site where-    reCaptchaSiteKey :: HandlerT site IO Text+    reCaptchaSiteKey :: HandlerFor site Text     reCaptchaSiteKey = pure "6LeIxAcTAAAAAJcZVRqyHh71UMIEGNQ_MXjiZKhI"-    reCaptchaSecretKey :: HandlerT site IO Text+    reCaptchaSecretKey :: HandlerFor site Text     reCaptchaSecretKey = pure "6LeIxAcTAAAAAGG-vFI1TnRWxMZNFuojJ4WifJWe"     -- | with specific language from <https://developers.google.com/recaptcha/docs/language>     --     -- > reCaptchaLanguage = pure (Just "ru")-    reCaptchaLanguage :: HandlerT site IO (Maybe Text)+    reCaptchaLanguage :: HandlerFor site (Maybe Text)     reCaptchaLanguage = pure Nothing  newtype SiteverifyResponse@@ -28,13 +28,13 @@     deriving (Eq, Ord, Read, Show, Generic, FromJSON, ToJSON)  -- | for Applicative style form-reCaptcha :: YesodReCaptcha site => AForm (HandlerT site IO) ()+reCaptcha :: YesodReCaptcha site => AForm (HandlerFor site) () reCaptcha = formToAForm mReCaptcha  -- | for Monadic style form-mReCaptcha :: YesodReCaptcha site => MForm (HandlerT site IO) (FormResult (), [FieldView site])+mReCaptcha :: YesodReCaptcha site => MForm (HandlerFor site) (FormResult (), [FieldView site]) mReCaptcha = do-    result <- liftHandlerT formResult+    result <- lift formResult     return (result, [fieldViewSite])   where formResult = do             postParam <- lookupPostParam "g-recaptcha-response"
yesod-recaptcha2.cabal view
@@ -1,9 +1,11 @@--- This file has been generated from package.yaml by hpack version 0.17.1.+-- This file has been generated from package.yaml by hpack version 0.20.0. -- -- see: https://github.com/sol/hpack+--+-- hash: d33d7c41317f538fc8619b0117572564e3a742273756bae5f8ae1271aa6f36b4  name:           yesod-recaptcha2-version:        0.2.3+version:        0.2.4 synopsis:       yesod recaptcha2 description:    recaptcha2 for yesod-form category:       Web@@ -28,10 +30,12 @@   hs-source-dirs:       src   build-depends:-      base >= 4.7 && < 5+      base >=4.7 && <5     , classy-prelude-yesod     , http-conduit     , yesod-auth   exposed-modules:       Yesod.ReCaptcha2+  other-modules:+      Paths_yesod_recaptcha2   default-language: Haskell2010