button-invoke ( button -- )

Vocabulary

ui.gadgets.buttons

Inputs

button

an object

Outputs

None

Definition

USING: accessors combinators kernel ;

IN: ui.gadgets.buttons

: button-invoke ( button -- )
    dup quot>> ( button -- ) call-effect ;