1
0
Fork 0
mirror of https://code.sup39.dev/repos/Wqawg synced 2024-12-27 02:44:52 +09:00

UX: Don't redirect to referer after login

It causes first login after verification to redirect to registration page,
which is weird, and the default Yesod falue is False, so, switching back to
False
This commit is contained in:
fr33domlover 2022-09-28 14:10:20 +00:00
parent 861d7636bc
commit 0cc1e20f85

View file

@ -605,7 +605,7 @@ instance YesodAuth App where
-- Where to send a user after logout
logoutDest _ = HomeR
-- Override the above two destinations when a Referer: header is present
redirectToReferer _ = True
redirectToReferer _ = False
authenticate creds = liftHandler $ do
let ident = credsIdent creds