diff --git a/yesod-core/Yesod/Core/Internal/Session.hs b/yesod-core/Yesod/Core/Internal/Session.hs index d255f7ae..f8bc5f4d 100644 --- a/yesod-core/Yesod/Core/Internal/Session.hs +++ b/yesod-core/Yesod/Core/Internal/Session.hs @@ -55,7 +55,7 @@ decodeClientSession key date rhost encrypted = do -- to preserve the type. clientSessionDateCacher :: - NominalDiffTime -- ^ Inactive session valitity. + NominalDiffTime -- ^ Inactive session validity. -> IO (IO ClientSessionDateCache, IO ()) clientSessionDateCacher validity = do getClientSessionDateCache <- mkAutoUpdate defaultUpdateSettings