diff --git a/yesod-core/Yesod/Internal/Core.hs b/yesod-core/Yesod/Internal/Core.hs index 13691993..352c8dc7 100644 --- a/yesod-core/Yesod/Internal/Core.hs +++ b/yesod-core/Yesod/Internal/Core.hs @@ -326,7 +326,7 @@ class RenderRoute a => Yesod a where yepnopeJs :: a -> Maybe (Either Text (Route a)) yepnopeJs _ = Nothing - -- | Create a session backend + -- | Create a session backend. Returning `Nothing' disables sessions. makeSessionBackend :: a -> IO (Maybe (SessionBackend a)) makeSessionBackend a = do key <- encryptKey a