Add userdata to BasicAuth API type
commit9966e5b3044078f18aece298cb80cc93f4cde4c1
authoraaron levin <aaron.levin@soundcloud.com>
dateWed 17 Feb 2016, 19:23 (11 years ago)
parent84172c6
servant/src/Servant/API/BasicAuth.hs+1−1
@@ -20,7 +20,7 @@ import GHC.TypeLits (Symbol)
2020-- In Basic Auth, username and password are base64-encoded and transmitted via
2121-- the @Authorization@ header. Handshakes are not required, making it
2222-- relatively efficient.
23−data BasicAuth (realm :: Symbol)
23+data BasicAuth (realm :: Symbol) (userData :: *)
2424 deriving (Typeable)
2525
2626-- | A simple datatype to hold data required to decorate a request