Skip to content

Commit

Permalink
renamed to onErrorHtml
Browse files Browse the repository at this point in the history
  • Loading branch information
jprider63 committed Dec 23, 2013
1 parent ed0e551 commit df9a813
Showing 1 changed file with 3 additions and 3 deletions.
6 changes: 3 additions & 3 deletions yesod-auth/Yesod/Auth.hs
Original file line number Diff line number Diff line change
Expand Up @@ -167,8 +167,8 @@ class (Yesod master, PathPiece (AuthId master), RenderMessage master FormMessage

-- | Called on login error for HTTP requests. By default, calls
-- @setMessage@ and redirects to @dest@.
onError :: (MonadResourceBase m) => Route master -> Text -> HandlerT master m Html
onError dest msg = do
onErrorHtml :: (MonadResourceBase m) => Route master -> Text -> HandlerT master m Html
onErrorHtml dest msg = do
setMessage $ toHtml msg
fmap asHtml $ redirect dest
where
Expand Down Expand Up @@ -251,7 +251,7 @@ loginErrorMessage dest msg =
sendResponseStatus unauthorized401 =<< (
selectRep $ do
provideRep $ do
onError dest msg
onErrorHtml dest msg
provideJsonMessage msg
)

Expand Down

0 comments on commit df9a813

Please sign in to comment.