select-elt ( editor elt -- )

Vocabulary

ui.gadgets.editors

Inputs

editor	an object
elt	an object

Outputs

None

Definition

USING: accessors documents.elements kernel ;

IN: ui.gadgets.editors

: select-elt ( editor elt -- )
    [ [ [ editor-caret ] [ model>> ] bi ] dip prev/next-elt ]
    [ drop ] 2bi editor-select ;