ren
  return $ domEvent Click e


------------------------------------------------------------------------------
------------------------------------------------------------------------------

-- | Details-element
data Details = Details
  { _detailsGlobals ∷ Maybe A.Globals
  , _detailsOpen    ∷ Maybe A.Open
  , _detailsCustom  ∷ Maybe A.Attr
  }


-- | An instance. 
instance A.AttrMap Deta
buttonCD ∷ (DomBuilder t m, PostBuild t m) ⇒ Dynamic t Button → m () → m (Event t ())
buttonCD bDyn children = do
  (e,_) ← elDynAttr' "button" (A.attrMap <$> bDyn) children
  return $ domEvent Click e


------------------------------------------------------------------------------
------------------------------------------------------------------------------

-- | Details-element
buttonCD bDyn children = do
  (e,_) ← elDynAttr' "button" (A.attrMap <$> bDyn) children
  return $ domEvent Click e


------------------------------------------------------------------------------
------------------------------------------------------------------------------

-- | Details-element