last-visible-line ( gadget -- n )
Factor handbook » UI framework » Implementing new gadgets » Gadget line support
Prev:first-visible-line ( gadget -- n )
Next:line>y ( n gadget -- y )


Vocabulary
ui.gadgets.line-support

Inputs
gadgetan object


Outputs
nan object


Definition
USING: accessors kernel math math.vectors ;

IN: ui.gadgets.line-support

: last-visible-line ( gadget -- n )
[ [ loc>> ] [ dim>> ] bi v+ ] visible-line 1 + ;