children = snd <$> button' bm children

-- | A short-hand notion for @ el\' \"button\" ... @
buttonN' ∷ forall t m a. DomBuilder t m ⇒ m a → m (Element EventResult (DomBu
button ∷ forall t m a. DomBuilder t m ⇒ Button → m a → m a
button bm children = snd <$> button' bm children
button bm children = snd <$> button' bm children