commit
a7749a04b7
3 changed files with 2 additions and 3 deletions
|
@ -4,7 +4,7 @@
|
|||
|
||||
![servant](https://raw.githubusercontent.com/haskell-servant/servant/master/servant.png)
|
||||
|
||||
This library lets you derive automatically Haskell functions that let you query each endpoint of a *servant* webservice.
|
||||
This library lets you automatically derive Haskell functions that let you query each endpoint of a *servant* webservice.
|
||||
|
||||
## Example
|
||||
|
||||
|
|
|
@ -85,7 +85,7 @@ reqToRequest req (BaseUrl reqScheme reqHost reqPort) =
|
|||
setheaders r = r { requestHeaders = Prelude.map toProperHeader (headers req) }
|
||||
|
||||
toProperHeader (name, val) =
|
||||
(fromString name, encodeUtf8 val)
|
||||
(fromString name, encodeUtf8 val)
|
||||
|
||||
|
||||
-- * performing requests
|
||||
|
|
|
@ -255,4 +255,3 @@ pathGen = fmap NonEmpty path
|
|||
filter (not . (`elem` "?%[]/#;")) $
|
||||
filter isPrint $
|
||||
map chr [0..127]
|
||||
|
||||
|
|
Loading…
Reference in a new issue