Merge pull request #368 from reflex-frp/ts-fix-no-th
Fix type of xhrResponse_headers lens when TH is disabled
commitf5a9bbec462a4e752609d8e6e65de4c44317601f
authorElliot Cameron <3noch@users.noreply.github.com>
dateThu 9 Apr 2020, 11:09 (7 years ago)
parent8bdda4ee0c18fe
reflex-dom-core/src/Reflex/Dom/Xhr.hs+1−1
@@ -446,7 +446,7 @@ xhrResponse_responseText :: Lens' XhrResponse (Maybe Text)
446446xhrResponse_responseText f (XhrResponse x1 x2 x3 x4 x5) = (\y -> XhrResponse x1 x2 x3 y x5) <$> f x4
447447{-# INLINE xhrResponse_responseText #-}
448448
449−xhrResponse_headers :: Lens' XhrResponse (Map Text Text)
449+xhrResponse_headers :: Lens' XhrResponse (Map (CI Text) Text)
450450xhrResponse_headers f (XhrResponse x1 x2 x3 x4 x5) = (\y -> XhrResponse x1 x2 x3 x4 y) <$> f x5
451451{-# INLINE xhrResponse_headers #-}
452452