<interactor> ( -- gadget )

Vocabulary

ui.tools.listener

Inputs

None

Outputs

gadget

an object

Definition

USING: accessors concurrency.flags documents.elements kernel
ui.gadgets.editors ui.tools.listener.history ;

IN: ui.tools.listener

: <interactor> ( -- gadget )
    interactor new-editor interactor-font >>font <flag> >>flag
    dup one-word-elt <element-model> >>token-model
    dup <word-model> >>word-model
    dup model>> <history> >>history ;