Merge remote-tracking branch 'origin/master'

This commit is contained in:
Michael Snoyman 2012-04-24 17:33:06 +03:00
commit 81e61c4b55

View File

@ -727,7 +727,7 @@ loadClientSession key timeout sessionName master req now = return (sess, save)
let host = "" -- fixme, properly lock sessions to client address
decodeClientSession key now host val
save sess' now' = do
-- fixme should we be caching this?
-- We should never cache the IV! Be careful!
iv <- liftIO CS.randomIV
return [AddCookie def
{ setCookieName = sessionName