haskell/yesod
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

improve makeSessionBackend comment in scaffold

Browse Source
This commit is contained in:
Luite Stegeman 2012-03-13 11:09:18 +01:00
parent 00b9acd98d
commit 344a884656
2 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
yesod/scaffold/Foundation.hs.cg
View File

@ -85,7 +85,7 @@ instance Yesod ~sitearg~ where
approot = ApprootMaster $ appRoot . settings approot = ApprootMaster $ appRoot . settings
-- Store session data on the client in encrypted cookies, -- Store session data on the client in encrypted cookies,
-- place the encryption key file in the config folder -- default session idle timeout is 120 minutes
makeSessionBackend _ = do makeSessionBackend _ = do
key <- getKey "config/client_session_key.aes" key <- getKey "config/client_session_key.aes"
return . Just $ clientSessionBackend key 120 return . Just $ clientSessionBackend key 120

2
yesod/scaffold/tiny/Foundation.hs.cg
View File

@ -63,7 +63,7 @@ instance Yesod ~sitearg~ where
approot = ApprootMaster $ appRoot . settings approot = ApprootMaster $ appRoot . settings
-- Store session data on the client in encrypted cookies, -- Store session data on the client in encrypted cookies,
-- place the encryption key file in the config folder -- default session idle timeout is 120 minutes
makeSessionBackend _ = do makeSessionBackend _ = do
key <- getKey "config/client_session_key.aes" key <- getKey "config/client_session_key.aes"
return . Just $ clientSessionBackend key 120 return . Just $ clientSessionBackend key 120