yesod-auth-1.3.0.2: Authentication for Yesod.

Safe HaskellNone

Yesod.Auth.OpenId

Synopsis

Documentation

authOpenIdSource

Arguments

:: YesodAuth master 
=> IdentifierType 
-> [(Text, Text)]

extension fields

-> AuthPlugin master 

claimedKey :: TextSource

The main identifier provided by the OpenID authentication plugin is the "OP-local identifier". There is also sometimes a "claimed" identifier available.

In the credsExtra field of the Creds datatype, you can lookup this key to find the claimed identifier, if available.

 let finalID = fromMaybe (credsIdent creds)
             $ lookup claimedKey (credsExtra creds)

Since 1.0.2

credsIdentClaimed :: Creds m -> TextSource

A helper function which will get the claimed identifier, if available, falling back to the OP local identifier.

See claimedKey.

Since 1.0.2