Merge pull request #1501 from rnons/getPerson-signature
generalize type signature of GoogleEmail2.getPerson
This commit is contained in:
commit
a68548488c
@ -1,3 +1,7 @@
|
|||||||
|
## 1.6.3
|
||||||
|
|
||||||
|
* Generalize GoogleEmail2.getPerson [#1501](https://github.com/yesodweb/yesod/pull/1501)
|
||||||
|
|
||||||
## 1.6.2
|
## 1.6.2
|
||||||
|
|
||||||
* Remove MINIMAL praggma for authHttpManager [#1489](https://github.com/yesodweb/yesod/issues/1489)
|
* Remove MINIMAL praggma for authHttpManager [#1489](https://github.com/yesodweb/yesod/issues/1489)
|
||||||
|
|||||||
@ -270,7 +270,7 @@ makeHttpRequest req =
|
|||||||
-- Will throw 'HttpException' in case of network problems or error response code.
|
-- Will throw 'HttpException' in case of network problems or error response code.
|
||||||
--
|
--
|
||||||
-- @since 1.4.3
|
-- @since 1.4.3
|
||||||
getPerson :: Manager -> Token -> AuthHandler site (Maybe Person)
|
getPerson :: MonadHandler m => Manager -> Token -> m (Maybe Person)
|
||||||
getPerson manager token = liftSubHandler $ parseMaybe parseJSON <$> (do
|
getPerson manager token = liftSubHandler $ parseMaybe parseJSON <$> (do
|
||||||
req <- personValueRequest token
|
req <- personValueRequest token
|
||||||
res <- http req manager
|
res <- http req manager
|
||||||
|
|||||||
@ -1,5 +1,5 @@
|
|||||||
name: yesod-auth
|
name: yesod-auth
|
||||||
version: 1.6.2
|
version: 1.6.3
|
||||||
license: MIT
|
license: MIT
|
||||||
license-file: LICENSE
|
license-file: LICENSE
|
||||||
author: Michael Snoyman, Patrick Brisbin
|
author: Michael Snoyman, Patrick Brisbin
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user