Merge pull request #792 from geraldus/auth-minor-improvements
pre-baked Route Auth value
This commit is contained in:
commit
4fd1f76b17
@ -9,6 +9,7 @@ module Yesod.Auth.BrowserId
|
||||
, BrowserIdSettings
|
||||
, bisAudience
|
||||
, bisLazyLoad
|
||||
, forwardUrl
|
||||
) where
|
||||
|
||||
import Yesod.Auth
|
||||
@ -28,8 +29,11 @@ import Data.Default
|
||||
pid :: Text
|
||||
pid = "browserid"
|
||||
|
||||
complete :: Route Auth
|
||||
complete = PluginR pid []
|
||||
forwardUrl :: AuthRoute
|
||||
forwardUrl = PluginR pid []
|
||||
|
||||
complete :: AuthRoute
|
||||
complete = forwardUrl
|
||||
|
||||
-- | A settings type for various configuration options relevant to BrowserID.
|
||||
--
|
||||
|
||||
Loading…
Reference in New Issue
Block a user