<model-action-field> ( -- field )

Vocabulary

ui.gadgets.controls

Inputs

None

Outputs

field

an action-field

Word description

Field that updates its model with its contents when the user hits the return key

Definition

USING: accessors kernel models ui.gadgets ui.gadgets.editors ;

IN: ui.gadgets.controls

: <model-action-field> ( -- field )
    f <action-field> dup [ set-control-value ] curry >>quot
    f <model> >>model ;