git.iko.soy/servant
on master help sign in
Add userdata to BasicAuth API type
9966e5baaron levin
servant/src/Servant/API/BasicAuth.hs+1−1
compare with master
unifiedsplit
@@ -20,7 +20,7 @@ import GHC.TypeLits (Symbol)
20-- In Basic Auth, username and password are base64-encoded and transmitted via
20-- In Basic Auth, username and password are base64-encoded and transmitted via
21-- the @Authorization@ header. Handshakes are not required, making it
21-- the @Authorization@ header. Handshakes are not required, making it
22-- relatively efficient.
22-- relatively efficient.
23−data BasicAuth (realm :: Symbol)
23+data BasicAuth (realm :: Symbol) (userData :: *)
24 deriving (Typeable)
24 deriving (Typeable)
25
25
26-- | A simple datatype to hold data required to decorate a request
26-- | A simple datatype to hold data required to decorate a request