add-gadget-with-border ( parent child -- parent )

Vocabulary

game.input.demos.joysticks

Inputs

parent	an object
child	an object

Outputs

parent

an object

Definition

USING: accessors colors ui.gadgets ui.gadgets.borders
ui.pens.solid ;

IN: game.input.demos.joysticks

: add-gadget-with-border ( parent child -- parent )
    { 2 2 } <border> COLOR: gray <solid> >>boundary add-gadget ;