fix minor typos

This commit is contained in:
Al Zohali 2017-03-19 23:49:52 +03:00
parent b0dbd79a06
commit b806339200
2 changed files with 3 additions and 3 deletions

View file

@ -12,7 +12,7 @@ data RemoteHost deriving Typeable
-- $remotehost
--
-- | Use 'RemoteHost' whenever your request handlers need the host or IP address
-- Use 'RemoteHost' whenever your request handlers need the host or IP address
-- from which the client issued the HTTP request. The corresponding handlers
-- receive arguments of type @SockAddr@ (from @Network.Socket@).
--

View file

@ -45,7 +45,7 @@ import Prelude ()
import Prelude.Compat
-- | Response Header objects. You should never need to construct one directly.
-- Instead, use 'addOptionalHeader.
-- Instead, use 'addOptionalHeader'.
data Headers ls a = Headers { getResponse :: a
-- ^ The underlying value of a 'Headers'
, getHeadersHList :: HList ls
@ -125,7 +125,7 @@ instance OVERLAPPABLE_ ( KnownSymbol h, ToHttpApiData v
-- | @addHeader@ adds a header to a response. Note that it changes the type of
-- the value in the following ways:
--
-- 1. A simple value is wrapped in "Headers [<hdr>]":
-- 1. A simple value is wrapped in "Headers '[hdr]":
--
-- >>> let example1 = addHeader 5 "hi" :: Headers '[Header "someheader" Int] String;
-- >>> getHeaders example1