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

replace pure with Just for backwards compat

Browse Source
This commit is contained in:
Bob Long 2016-05-03 15:18:04 +01:00
parent 9b0caaf2cf
commit 1834d255e6
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
yesod-core/Yesod/Core/Class/Yesod.hs
View File

@ -391,7 +391,7 @@ strictSameSiteSessions = sameSiteSession sameSiteStrict
sameSiteSession :: SameSiteOption -> IO (Maybe SessionBackend) -> IO (Maybe SessionBackend)
sameSiteSession s = (fmap . fmap) secureSessionCookies
where
sameSite cookie = cookie { setCookieSameSite = (pure s) }
sameSite cookie = cookie { setCookieSameSite = (Just s) }
secureSessionCookies = customizeSessionCookies sameSite
-- | Apply a Strict-Transport-Security header with the specified timeout to