git.iko.soy/reflex-dom
on develop help sign in
Fix type of xhrResponse_headers lens when TH is disabled
e0c18feTom Smalley
reflex-dom-core/src/Reflex/Dom/Xhr.hs+1−1
compare with develop
unifiedsplit
@@ -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