drag-selection-caret ( loc editor element -- loc )


Vocabulary
ui.gadgets.editors

Inputs
locan object
editoran object
elementan object


Outputs
locan object


Definition
USING: accessors documents.elements kernel ;

IN: ui.gadgets.editors

: drag-selection-caret ( loc editor element -- loc )
[ [ drag-direction? ] [ model>> ] 2bi ] dip prev/next-elt ?
;