find-deploy-gadget ( gadget -- deploy-gadget )

Vocabulary

ui.tools.deploy

Inputs

gadget

an object

Outputs

deploy-gadget

an object

Definition

USING: ui.gadgets ;

IN: ui.tools.deploy

: find-deploy-gadget ( gadget -- deploy-gadget )
    [ deploy-gadget? ] find-parent ;