From 1834d255e63299b9a3f0971c7a64137c06c30c55 Mon Sep 17 00:00:00 2001
From: Bob Long <robertjflong@gmail.com>
Date: Tue, 3 May 2016 15:18:04 +0100
Subject: [PATCH] replace pure with Just for backwards compat

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

diff --git a/yesod-core/Yesod/Core/Class/Yesod.hs b/yesod-core/Yesod/Core/Class/Yesod.hs
index 45cefd0a..2ccf2591 100644
--- a/yesod-core/Yesod/Core/Class/Yesod.hs
+++ b/yesod-core/Yesod/Core/Class/Yesod.hs
@@ -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