From 32d5c3f5f1ec5dc4ed46e2495e95f46e725e7de3 Mon Sep 17 00:00:00 2001
From: Luite Stegeman <stegeman@gmail.com>
Date: Sat, 11 Feb 2012 20:37:40 +0100
Subject: [PATCH] Improve makeSessionBackend documentation

---
 yesod-core/Yesod/Internal/Core.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

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