on master help sign in
Be consistent in spelling of “Json”
9a98e52mrkkrp
Network/HTTP/Req.hs+4−4
@@ -134,7 +134,7 @@ module Network.HTTP.Req
134 -- ** Body
134 -- ** Body
135 -- $body
135 -- $body
136 , NoReqBody (..)
136 , NoReqBody (..)
137− , ReqBodyJSON (..)
137+ , ReqBodyJson (..)
138 , ReqBodyFile (..)
138 , ReqBodyFile (..)
139 , ReqBodyBs (..)
139 , ReqBodyBs (..)
140 , ReqBodyLbs (..)
140 , ReqBodyLbs (..)
@@ -637,10 +637,10 @@ instance HttpBody NoReqBody where
637-- This body option sets the @Content-Type@ header to @\"application/json;
637-- This body option sets the @Content-Type@ header to @\"application/json;
638-- charset=utf-8\"@ value.
638-- charset=utf-8\"@ value.
639
639
640−newtype ReqBodyJSON a = ReqBodyJSON a
640+newtype ReqBodyJson a = ReqBodyJson a
641
641
642−instance ToJSON a => HttpBody (ReqBodyJSON a) where
642+instance ToJSON a => HttpBody (ReqBodyJson a) where
643− getRequestBody (ReqBodyJSON a) = L.RequestBodyLBS (A.encode a)
643+ getRequestBody (ReqBodyJson a) = L.RequestBodyLBS (A.encode a)
644 getRequestContentType Proxy = pure "application/json; charset=utf-8"
644 getRequestContentType Proxy = pure "application/json; charset=utf-8"
645
645
646-- | This body option streams request body from a file. It is expected that
646-- | This body option streams request body from a file. It is expected that