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

Export credsKey

Browse Source
This commit is contained in:
Michael Snoyman 2013-12-04 05:26:51 +02:00
parent cf0fad20bc
commit 04893d6b0a
1 changed files with 5 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
yesod-auth/Yesod/Auth.hs
View File

@ -34,6 +34,8 @@ module Yesod.Auth
, AuthException (..) , AuthException (..)
-- * Helper -- * Helper
, AuthHandler , AuthHandler
-- * Internal
, credsKey
) where ) where
import Control.Monad (when) import Control.Monad (when)
@ -163,6 +165,9 @@ class (Yesod master, PathPiece (AuthId master), RenderMessage master FormMessage
=> HandlerT master IO (Maybe (AuthId master)) => HandlerT master IO (Maybe (AuthId master))
maybeAuthId = defaultMaybeAuthId maybeAuthId = defaultMaybeAuthId
-- | Internal session key used to hold the authentication information.
--
-- Since 1.2.3
credsKey :: Text credsKey :: Text
credsKey = "_ID" credsKey = "_ID"