drag-caret&mark ( editor -- caret mark )


Vocabulary
ui.gadgets.editors

Inputs
editoran object


Outputs
caretan object
markan object


Definition
USING: kernel ;

IN: ui.gadgets.editors

: drag-caret&mark ( editor -- caret mark )
[ clicked-loc ] [ mouse-elt ] bi
[ drag-selection-caret ] [ drag-selection-mark ] 3bi ;