eeva/servant
1
0
Fork 0
Code Issues Pull requests Projects Releases Wiki Activity

tweaks

Browse source
This commit is contained in:
Alp Mestanogullari 2018-07-06 00:38:22 +02:00 committed by GitHub
parent fbd9f3ec29
commit 66039fd124
No known key found for this signature in database
GPG key ID: 4AEE18F83AFDEB23
1 changed files with 3 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
doc/cookbook/using-free-client/UsingFreeClient.lhs
View file

@ -118,7 +118,7 @@ and `BaseUrl`:
mgr <- HTTP.newManager HTTP.defaultManagerSettings
```
Now we can use `servant-client` internals to convert servant's `Request`
Now we can use `servant-client`'s internals to convert servant's `Request`
to http-client's `Request`, and we can inspect it:
```haskell
@ -126,8 +126,8 @@ to http-client's `Request`, and we can inspect it:
putStrLn $ "Making request: " ++ show req'
```
`servant-client` does a bit more than `httpLbs`, but that's enough for us.
We get back a http-client `Response` which we can also inspect
`servant-client`'s request does a little more, but this is good enough for
our demo. We get back an http-client `Response` which we can also inspect.
```haskell
res' <- HTTP.httpLbs req' mgr