From 66039fd1246bc4b47325ebac41ee8a9529e7e57d Mon Sep 17 00:00:00 2001 From: Alp Mestanogullari Date: Fri, 6 Jul 2018 00:38:22 +0200 Subject: [PATCH] tweaks --- doc/cookbook/using-free-client/UsingFreeClient.lhs | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/doc/cookbook/using-free-client/UsingFreeClient.lhs b/doc/cookbook/using-free-client/UsingFreeClient.lhs index 2d51eaaa..a8767353 100644 --- a/doc/cookbook/using-free-client/UsingFreeClient.lhs +++ b/doc/cookbook/using-free-client/UsingFreeClient.lhs @@ -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