popup-below ( owner child -- )

Vocabulary

ui-demo

Inputs

owner	an object
child	an object

Outputs

None

Definition

USING: accessors kernel math.rectangles ui.gadgets.glass ;

IN: ui-demo

: popup-below ( owner child -- )
    over [ { 0 0 } ] dip dim>> <rect> show-glass ;