gadget>word ( gadget -- word )


Vocabulary
ui.gadgets.paragraphs.private

Inputs
gadgetan object


Outputs
wordan object


Definition
USING: kernel sequences ui.gadgets ui.gadgets.paragraphs
wrap.words ;

IN: ui.gadgets.paragraphs.private

: gadget>word ( gadget -- word )
[ ] [ pref-dim first ] [ word-break? ] tri <wrapping-word> ;