From ea5e1cca265c8496bc4fafd2cfd3a27909b3a8d8 Mon Sep 17 00:00:00 2001 From: "Daniel Campoverde [alx741]" Date: Sat, 18 Feb 2017 18:28:53 -0500 Subject: [PATCH] Update emailLoginHandler 'since' version --- yesod-auth/Yesod/Auth/Email.hs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/yesod-auth/Yesod/Auth/Email.hs b/yesod-auth/Yesod/Auth/Email.hs index f52e7c99..aa76231a 100644 --- a/yesod-auth/Yesod/Auth/Email.hs +++ b/yesod-auth/Yesod/Auth/Email.hs @@ -297,7 +297,7 @@ class ( YesodAuth site -- -- Default: 'defaultEmailLoginHandler'. -- - -- @since 1.4.11 + -- @since 1.4.17 emailLoginHandler :: (Route Auth -> Route site) -> WidgetT site IO () emailLoginHandler = defaultEmailLoginHandler @@ -360,7 +360,7 @@ getRegisterR = registerHandler -- | Default implementation of 'emailLoginHandler'. -- --- @since 1.2.6 +-- @since 1.4.17 defaultEmailLoginHandler :: YesodAuthEmail master => (Route Auth -> Route master) -> WidgetT master IO () defaultEmailLoginHandler toParent = do (widget, enctype) <- liftWidgetT $ generateFormPost loginForm