each-child ( ... gadget quot: ( ... child -- ... ) -- ... )
Factor handbook » UI framework » Building user interfaces » Gadget hierarchy and layouts » Layout basics

Prev:	nth-gadget ( n gadget -- child )
Next:	child? ( parent child -- ? )

Vocabulary
ui.gadgets

Inputs

gadget	a gadget
quot	a quotation with stack effect ( ... child -- ... )

Outputs
None

Word description
Applies the quotation to each child of the gadget.

Definition

USING: accessors kernel sequences ;

IN: ui.gadgets

: each-child
    ( ... gadget quot: ( ... child -- ... ) -- ... )
    [ children>> ] dip each ; inline