cus
  , _selectDisabled  ∷ Maybe A.Disabled
  , _selectForm      ∷ Maybe A.Form
  , _selectMultiple  ∷ Maybe A.Multiple
  , _selectName      ∷ Maybe A.Name
  ,
labelCForId ∷  (DomBuilder t m, PostBuild t m) ⇒ Maybe A.Globals → A.ForId → m (Event t ())
labelCForId bm f = labelC (Label bm (Just f) Nothing) blank
labelCForId bm f = labelC (Label bm (Just f) Nothing) blank