com-revert ( gadget -- )

Vocabulary

ui.tools.deploy

Inputs

gadget

an object

Outputs

None

Definition

USING: kernel ui.gadgets ;

IN: ui.tools.deploy

: com-revert ( gadget -- )
    dup find-deploy-config swap find-deploy-settings
    set-control-value ;