on develop help sign in
Merge pull request #368 from reflex-frp/ts-fix-no-th
f5a9bbeElliot Cameron
reflex-dom-core/src/Reflex/Dom/Xhr.hs+1−1
@@ -446,7 +446,7 @@ xhrResponse_responseText :: Lens' XhrResponse (Maybe Text)
446xhrResponse_responseText f (XhrResponse x1 x2 x3 x4 x5) = (\y -> XhrResponse x1 x2 x3 y x5) <$> f x4
446xhrResponse_responseText f (XhrResponse x1 x2 x3 x4 x5) = (\y -> XhrResponse x1 x2 x3 y x5) <$> f x4
447{-# INLINE xhrResponse_responseText #-}
447{-# INLINE xhrResponse_responseText #-}
448
448
449−xhrResponse_headers :: Lens' XhrResponse (Map Text Text)
449+xhrResponse_headers :: Lens' XhrResponse (Map (CI Text) Text)
450xhrResponse_headers f (XhrResponse x1 x2 x3 x4 x5) = (\y -> XhrResponse x1 x2 x3 x4 y) <$> f x5
450xhrResponse_headers f (XhrResponse x1 x2 x3 x4 x5) = (\y -> XhrResponse x1 x2 x3 x4 y) <$> f x5
451{-# INLINE xhrResponse_headers #-}
451{-# INLINE xhrResponse_headers #-}
452
452