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

-- | TextArea-element has the following attributes:
-- glob
selectD ∷ forall t m a. (DomBuilder t m, PostBuild t m) ⇒ Dynamic t Select → m a → m a
selectD bm children = snd <$> selectD' bm children
selectD bm children = snd <$> selectD' bm children