pack-cap-height ( pack -- n/f )


Vocabulary
ui.gadgets.packs.private

Inputs
packan object


Outputs
n/fan object


Definition
USING: accessors sequences ui.baseline-alignment
ui.baseline-alignment.private ;

IN: ui.gadgets.packs.private

: pack-cap-height ( pack -- n/f )
children>> [ cap-height ] map ?maximum ; inline