command-button-quot ( target command -- quot )

Vocabulary

ui.gadgets.buttons

Inputs

target	an object
command	an object

Outputs

quot

an object

Definition

USING: kernel ui.commands ;

IN: ui.gadgets.buttons

: command-button-quot ( target command -- quot )
    [ invoke-command ] 2curry ;