class gui.CheckableMenuItem():

  implements MenuChildView

  constructor (

   label :: ObsOrValue.of(View.LabelString),

   ~checked: checked :: ObsOrValue.of(Boolean) = #false,

   ~action: action :: Boolean -> ~any = values,

   ~enable: enable :: ObsOrValue.of(Boolean) = #true,

   ~help: help_text :: ObsOrValue.of(maybe(View.LabelString)) = #false,

   ~shortcut: shortcut :: ObsOrValue.of(maybe(MenuItem.Shortcut))

                = #false

  )