b806339 · servant · git.iko.soy

git.iko.soy/servant

fix minor typos

commitb80633920048e50a8397afcea91d28d65dd76edf authorAl Zohali <zohl@fmap.me> dateSun 19 Mar 2017, 23:49 (10 years ago) parentb0dbd79

2 files changed+3−3

unifiedsplit

servant/src/Servant/API/RemoteHost.hs+1−1

@@ -12,7 +12,7 @@ data RemoteHost deriving Typeable

1212

1313-- $remotehost

1414--

15−-- | Use 'RemoteHost' whenever your request handlers need the host or IP address

15+-- Use 'RemoteHost' whenever your request handlers need the host or IP address

1616-- from which the client issued the HTTP request. The corresponding handlers

1717-- receive arguments of type @SockAddr@ (from @Network.Socket@).

1818--

servant/src/Servant/API/ResponseHeaders.hs+2−2

@@ -45,7 +45,7 @@ import Prelude ()

4545import Prelude.Compat

4646

4747-- | Response Header objects. You should never need to construct one directly.

48−-- Instead, use 'addOptionalHeader.

48+-- Instead, use 'addOptionalHeader'.

4949data Headers ls a = Headers { getResponse :: a

5050 -- ^ The underlying value of a 'Headers'

5151 , getHeadersHList :: HList ls

@@ -125,7 +125,7 @@ instance OVERLAPPABLE_ ( KnownSymbol h, ToHttpApiData v

125125-- | @addHeader@ adds a header to a response. Note that it changes the type of

126126-- the value in the following ways:

127127--

128−-- 1. A simple value is wrapped in "Headers [<hdr>]":

128+-- 1. A simple value is wrapped in "Headers '[hdr]":

129129--

130130-- >>> let example1 = addHeader 5 "hi" :: Headers '[Header "someheader" Int] String;

131131-- >>> getHeaders example1