line-height* ( gadget -- n )

Vocabulary

ui.gadgets.line-support

Inputs

gadget

an object

Outputs

n

an object

Definition

IN: ui.gadgets.line-support

GENERIC: line-height* ( gadget -- n )

Methods

USING: accessors math math.functions ui.gadgets.line-support
ui.text ;

M: line-gadget line-height*
    font>> font-metrics height>> ceiling >integer ;


USING: accessors kernel math math.order sequences
ui.gadgets.line-support ui.gadgets.tables
ui.gadgets.tables.private ;

M: table line-height*
    [ font>> ] [ renderer>> prototype-row ] bi
    [ cell-dim + nip ] with [ max ] map-reduce ;