08af017 · reflex-dom · git.iko.soy

git.iko.soy/reflex-dom

on develop help sign in

add elDynAttrNS

08af017Marisa Kirisame9 years ago

reflex-dom-core/src/Reflex/Dom/Widget/Basic.hs+5

@@ -27,6 +27,7 @@ module Reflex.Dom.Widget.Basic

27 , elClass

28 , elDynAttr

29 , elDynClass

30+ , elDynAttrNS

31 -- ** With Element Results

32 -- ** With Element Results

32 , el'

33 , el'

@@ -213,6 +214,10 @@ elDynAttrNS' mns elementTag attrs child = do

213 notReadyUntil postBuild

214 notReadyUntil postBuild

214 return result

215 return result

215

216

217+{-# INLINABLE elDynAttrNS #-}

218+elDynAttrNS :: forall t m a. (DomBuilder t m, PostBuild t m) => Maybe Text -> Text -> Dynamic t (Map Text Text) -> m a -> m a

219+elDynAttrNS mns elementTag attrs child = fmap snd $ elDynAttrNS' mns elementTag attrs child

220+

216dynamicAttributesToModifyAttributes :: (Ord k, PostBuild t m) => Dynamic t (Map k Text) -> m (Event t (Map k (Maybe Text)))

221dynamicAttributesToModifyAttributes :: (Ord k, PostBuild t m) => Dynamic t (Map k Text) -> m (Event t (Map k (Maybe Text)))

217dynamicAttributesToModifyAttributes = dynamicAttributesToModifyAttributesWithInitial mempty

222dynamicAttributesToModifyAttributes = dynamicAttributesToModifyAttributesWithInitial mempty

218

223