Add Functor instances for XhrRequest and XhrRequestConfig
commitadb77428f19b6ee35fd8c379a8e3b44943eeebcd
authorDoug Beardsley <mightybyte@gmail.com>
dateThu 7 Jul 2016, 12:36 (10 years ago)
parent20c76c4
src/Reflex/Dom/Xhr.hs+7
@@ -261,3 +261,10 @@ liftM concat $ mapM makeLenses
261261 , ''XhrRequestConfig
262262 , ''XhrResponse
263263 ]
264+
265+instance Functor XhrRequest where
266+ fmap f = over xhrRequest_config (fmap f)
267+
268+instance Functor XhrRequestConfig where
269+ fmap f = over xhrRequestConfig_sendData f
270+