next-page-elt ( editor -- editor element )


Vocabulary
ui.gadgets.editors.private

Inputs
editoran object


Outputs
editoran object
elementan object


Definition
USING: kernel math sequences ui.gadgets ui.gadgets.editors ;

IN: ui.gadgets.editors.private

: next-page-elt ( editor -- editor element )
dup [ control-value length 1 - ] [ editor-caret first ] bi -
page-elt ;