@@ -205,12 +205,12 @@ req method url body options = do
205 manager <- liftIO (readIORef globalManager)
205 manager <- liftIO (readIORef globalManager)
206 let request = flip appEndo L.defaultRequest $
206 let request = flip appEndo L.defaultRequest $
207 -- NOTE Order of 'mappend's matters, here method is overwritten
207 -- NOTE Order of 'mappend's matters, here method is overwritten
208− -- first and 'config' takes its effect last. In particular, this
208+ -- first and 'options' take effect last. In particular, this means
209− -- means that 'options' can overwrite things set by 'url' and
209+ -- that 'options' can overwrite things set by other request
210− -- 'body', which is useful for setting port number, "Content-Type"
210+ -- components, which is useful for setting port number,
211− -- header, etc.
211+ -- "Content-Type" header, etc.
212− getRequestMod config <>
213 getRequestMod options <>
212 getRequestMod options <>
213+ getRequestMod config <>
214 getRequestMod (Womb body :: Womb "body" body) <>
214 getRequestMod (Womb body :: Womb "body" body) <>
215 getRequestMod url <>
215 getRequestMod url <>
216 getRequestMod (Womb method :: Womb "method" method)
216 getRequestMod (Womb method :: Womb "method" method)