eeva/servant
1
0
Fork 0
Code Issues Pull requests Projects Releases Wiki Activity

Use new strictProtect (arguments were flipped)

Browse source
This commit is contained in:
aaron levin 2015-08-09 11:39:26 -04:00 committed by aaron levin
parent 961c08bdac
commit d692c05cdb
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
servant-examples/auth-combinator/auth-combinator.hs
View file

@ -97,7 +97,7 @@ api :: Proxy API
api = Proxy
server :: Server API
server = strictProtect isGoodCookie (const (return prvdata)) cookieAuthHandlers
server = strictProtect isGoodCookie cookieAuthHandlers (const (return prvdata))
:<|> return pubdata
where prvdata = [PrivateData "this is a secret"]