gadget-at-path ( parent path -- gadget )

Vocabulary

ui.traverse

Inputs

parent	an object
path	an object

Outputs

gadget

an object

Definition

USING: kernel sequences ui.gadgets ;

IN: ui.traverse

: gadget-at-path ( parent path -- gadget )
    [ swap nth-gadget ] each ;