@@ -179,7 +179,7 @@ responseStatus (ResponseBuilder s _ _ ) = s
179179responseStatus (ResponseSource s _ _ ) = s
180180responseStatus (ResponseRaw _ res ) = responseStatus res
181181
182−-- | Accessing 'H.Status' in 'Response'.
182+-- | Accessing 'H.ResponseHeaders' in 'Response'.
183183responseHeaders :: Response -> H.ResponseHeaders
184184responseHeaders (ResponseFile _ hs _ _) = hs
185185responseHeaders (ResponseBuilder _ hs _ ) = hs