<control-buttons> ( -- gadget )

Vocabulary

gml.ui

Inputs

None

Outputs

gadget

an object

Definition

USING: accessors ui.gadgets ui.gadgets.packs ;

IN: gml.ui

: <control-buttons> ( -- gadget )
    <shelf> { 5 5 } >>gap <new-button> add-gadget
    <update-button> add-gadget <reset-button> add-gadget ;