fix
commitc841a763fe2be67d3ff9dd375ba14613ba0849a0
authorAlex Babkin <alex.babkin@symbiont.io>
dateWed 1 Feb 2017, 18:56 (10 years ago)
parent6d20ba2
gogol/src/Network/Google/Auth/ServiceAccount.hs+1−1
@@ -68,7 +68,7 @@ authorizedUserToken :: (MonadIO m, MonadCatch m)
6868 -> Manager
6969 -> m (OAuthToken s)
7070authorizedUserToken u r = refreshRequest $
71− accountsRequest
71+ tokenRequest
7272 { Client.requestBody = textBody $
7373 "grant_type=refresh_token"
7474 <> "&client_id=" <> toQueryParam (_userId u)