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

setHeader -> addHeader

Browse Source
This commit is contained in:
Greg Weber 2013-04-03 15:24:12 -07:00
parent cb8aa986f0
commit a357922d39
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
yesod-core/Yesod/Core/Class/Yesod.hs
View File

@ -428,7 +428,7 @@ defaultErrorHandler NotAuthenticated = selectRep $ do
-- however, there is no standard to indicate a redirection -- however, there is no standard to indicate a redirection
-- --
-- change this to Basic or Digest if you allow those forms of authentications -- change this to Basic or Digest if you allow those forms of authentications
setHeader "WWW-Authenticate" "RedirectJSON realm=\"application\", param=\"authentication_url\"" addHeader "WWW-Authenticate" "RedirectJSON realm=\"application\", param=\"authentication_url\""
-- The client will just use the authentication_url in the JSON -- The client will just use the authentication_url in the JSON
site <- getYesod site <- getYesod