Improve makeSessionBackend documentation

2012-02-11 20:37:40 +01:00 · 2012-02-11 20:37:40 +01:00 · 32d5c3f5f1
commit 32d5c3f5f1
parent a37beb3447
1 changed files with 1 additions and 1 deletions
--- 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