<command-button> ( target gesture command -- button )
Factor handbook » UI framework » Building user interfaces » Pre-made UI gadgets » Button gadgets

Prev:	<repeat-button> ( label quot: ( button -- ) -- button )
Next:	<toolbar> ( target -- toolbar )

Vocabulary
ui.gadgets.buttons

Inputs

target	an object
gesture	a gesture
command	a command

Outputs

button

a new button

Word description
Creates a <border-button> which invokes the command on target when clicked.

See also
<button>, <border-button>, <roll-button>, <presentation>

Definition

USING: accessors kernel ui.commands ;

IN: ui.gadgets.buttons

:: <command-button> ( target gesture command -- button )
    command command-name target command command-button-quot
    [ [ drop ] ] dip compose <border-button>
    gesture gesture>tooltip >>tooltip ; inline