line-gadget-width ( pref-dim gadget -- w )

Vocabulary

ui.gadgets.line-support

Inputs

pref-dim	an object
gadget	an object

Outputs

w

an object

Definition

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

IN: ui.gadgets.line-support

: line-gadget-width ( pref-dim gadget -- w )
    [ first ]
    [ [ font>> em ] [ min-cols>> ] [ max-cols>> ] tri ] bi*
    clamp ;