on master help sign in
Merge pull request #716 from zohl/fix-minor-typos
4eabab7Oleg Grenrus
servant/src/Servant/API/RemoteHost.hs+1−1
@@ -12,7 +12,7 @@ data RemoteHost deriving Typeable
12
12
13-- $remotehost
13-- $remotehost
14--
14--
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
16-- from which the client issued the HTTP request. The corresponding handlers
16-- from which the client issued the HTTP request. The corresponding handlers
17-- receive arguments of type @SockAddr@ (from @Network.Socket@).
17-- receive arguments of type @SockAddr@ (from @Network.Socket@).
18--
18--
servant/src/Servant/API/ResponseHeaders.hs+2−2
@@ -45,7 +45,7 @@ import Prelude ()
45import Prelude.Compat
45import Prelude.Compat
46
46
47-- | Response Header objects. You should never need to construct one directly.
47-- | Response Header objects. You should never need to construct one directly.
48−-- Instead, use 'addOptionalHeader.
48+-- Instead, use 'addOptionalHeader'.
49data Headers ls a = Headers { getResponse :: a
49data Headers ls a = Headers { getResponse :: a
50 -- ^ The underlying value of a 'Headers'
50 -- ^ The underlying value of a 'Headers'
51 , getHeadersHList :: HList ls
51 , getHeadersHList :: HList ls
@@ -125,7 +125,7 @@ instance OVERLAPPABLE_ ( KnownSymbol h, ToHttpApiData v
125-- | @addHeader@ adds a header to a response. Note that it changes the type of
125-- | @addHeader@ adds a header to a response. Note that it changes the type of
126-- the value in the following ways:
126-- the value in the following ways:
127--
127--
128−-- 1. A simple value is wrapped in "Headers [<hdr>]":
128+-- 1. A simple value is wrapped in "Headers '[hdr]":
129--
129--
130-- >>> let example1 = addHeader 5 "hi" :: Headers '[Header "someheader" Int] String;
130-- >>> let example1 = addHeader 5 "hi" :: Headers '[Header "someheader" Int] String;
131-- >>> getHeaders example1
131-- >>> getHeaders example1