insert-gadget ( number parent gadget -- )

Vocabulary

ui.gadgets.layout

Inputs

number	an object
parent	an object
gadget	an object

Outputs

None

Definition

USING: accessors kernel sequences ;

IN: ui.gadgets.layout

: insert-gadget ( number parent gadget -- )
    -rot [ but-last insert-nth ] change-children drop ;