baseline-aligned-locs ( pack -- seq )

Vocabulary

ui.gadgets.packs.private

Inputs

pack

an object

Outputs

seq

an object

Definition

USING: accessors arrays kernel sequences ui.baseline-alignment ;

IN: ui.gadgets.packs.private

: baseline-aligned-locs ( pack -- seq )
    children>> align-baselines [ 0 swap 2array ] map ;