From 0eecb347d924e74f9552da59e137eb779e07908e Mon Sep 17 00:00:00 2001 From: Michael Snoyman Date: Tue, 30 Nov 2010 09:12:59 +0200 Subject: [PATCH] Login correctly uses redirectUltDest --- Yesod/Helpers/Auth.hs | 2 +- yesod-auth.cabal | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/Yesod/Helpers/Auth.hs b/Yesod/Helpers/Auth.hs index 80e0b6b3..55451476 100644 --- a/Yesod/Helpers/Auth.hs +++ b/Yesod/Helpers/Auth.hs @@ -118,7 +118,7 @@ setCreds doRedirects creds = do if doRedirects then do setMessage $ string "You are now logged in" - redirect RedirectTemporary $ loginDest y + redirectUltDest RedirectTemporary $ loginDest y else return () getCheckR :: YesodAuth m => GHandler Auth m RepHtmlJson diff --git a/yesod-auth.cabal b/yesod-auth.cabal index 55f3a3f8..776caf1f 100644 --- a/yesod-auth.cabal +++ b/yesod-auth.cabal @@ -1,5 +1,5 @@ name: yesod-auth -version: 0.2.0.2 +version: 0.2.0.3 license: BSD3 license-file: LICENSE author: Michael Snoyman