diff --git a/Foundation.hs b/Foundation.hs
index 4e300d7..03ad1af 100644
--- a/Foundation.hs
+++ b/Foundation.hs
@@ -163,6 +163,8 @@ instance YesodAuth App where
     -- Where to send a user after logout
     logoutDest _ = HomeR
 
+    redirectToReferer _ = True
+
     getAuthId creds = do
         muid <- maybeAuthId
         join $ runDB $ case muid of