add-glass ( glass world -- )

Vocabulary

ui.gadgets.glass.private

Inputs

glass	an object
world	an object

Outputs

None

Definition

USING: accessors kernel ui.gadgets vectors ;

IN: ui.gadgets.glass.private

: add-glass ( glass world -- )
    [ swap add-gadget drop ] [ [ ?push ] change-layers drop ]
    2bi ;