<active-buttons-popup> ( model title -- gadget )


Vocabulary
ui.tools.button-list

Inputs
modelan object
titlean object


Outputs
gadgetan object


Definition
USING: kernel ui.gadgets.labeled ui.gadgets.wrappers ui.theme
ui.tools.common ;

IN: ui.tools.button-list

: <active-buttons-popup> ( model title -- gadget )
[ <active-buttons-table> white-interior ] dip
popup-color <framed-labeled-gadget>
button-list-popup new-wrapper ;