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

Add userdata to BasicAuth API type

Browse source
This commit is contained in:
aaron levin 2016-02-17 19:23:05 +01:00
parent 84172c6135
commit 9966e5b304
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/src/Servant/API/BasicAuth.hs
View file

@ -20,7 +20,7 @@ import GHC.TypeLits (Symbol)
-- In Basic Auth, username and password are base64-encoded and transmitted via -- In Basic Auth, username and password are base64-encoded and transmitted via
-- the @Authorization@ header. Handshakes are not required, making it -- the @Authorization@ header. Handshakes are not required, making it
-- relatively efficient. -- relatively efficient.
data BasicAuth (realm :: Symbol) data BasicAuth (realm :: Symbol) (userData :: *)
deriving (Typeable) deriving (Typeable)
-- | A simple datatype to hold data required to decorate a request -- | A simple datatype to hold data required to decorate a request