button-clicked ( button -- )

Vocabulary

ui.gadgets.buttons

Inputs

button

an object

Outputs

None

Definition

USING: kernel ui.gadgets.buttons.private ;

IN: ui.gadgets.buttons

: button-clicked ( button -- )
    [ ] [ button-update ] [ button-rollover? ] tri
    [ button-invoke ] [ drop ] if ;