diff --git a/src/Vervis/Foundation.hs b/src/Vervis/Foundation.hs index 38b03ba..7eaeca3 100644 --- a/src/Vervis/Foundation.hs +++ b/src/Vervis/Foundation.hs @@ -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