Separate Response

[joneshf]

servant-oidc/src/OAuth2/Token.hs

Lines 57 to 68 in 5766f51

	-- | The response to a request for a new token.
	--
	-- <https://tools.ietf.org/html/rfc6749#section-4.1.4>
	data Response = Response
	-- TODO: the access token, its type, and its expiration date should really be together in a single type.
	-- The optionally returned refresh token is something else.
	{ responseAccessToken :: AccessToken
	, responseTokenType :: TokenType
	, responseExpiresIn :: Maybe ExpirationTime
	, responseRefreshToken :: Maybe RefreshToken
	, responseIdToken :: Jose.Jwt.Jwt
	} deriving (Eq, Show)

We should be careful that the serialization doesn't change.