Vocabulary
ui.gadgets.packs

Inputs and outputs

pack	a new pack
sizes	a sequence of pairs of integers

Word description
Lays out the pack's children along the orientation of the pack, with each gadget receiving its size from the corresponding index of the sizes sequence.

Notes
This word is useful if you are writing your own layout gadget which inherits from pack. This allows you to reuse layout logic while computing gadget sizes using a custom procedure.

Definition

USING: accessors kernel sequences ui.gadgets.packs.private ;

IN: ui.gadgets.packs

: pack-layout ( pack sizes -- )
[ round-dims packed-dims ] [ drop ] 2bi
[ children>> [ dim<< ] 2each ]
[ [ packed-locs ] [ children>> ] bi [ loc<< ] 2each ] 2bi ;