<pref-width> ( gadget -- gadget )


Vocabulary
ui-demo

Inputs
gadgetan object


Outputs
gadgetan object


Definition
USING: kernel ui.gadgets ui.gadgets.packs ;

IN: ui-demo

: <pref-width> ( gadget -- gadget ) <shelf> swap add-gadget ;