Handbook
Glossary
wrap-paragraph ( paragraph -- wrapped-paragraph )
Vocabulary
ui
.
gadgets
.
paragraphs
.
private
Inputs
paragraph
an
object
Outputs
wrapped-paragraph
an
object
Definition
USING:
accessors
kernel
sequences
wrap.words
;
IN:
ui.gadgets.paragraphs.private
:
wrap-paragraph
( paragraph -- wrapped-paragraph )
[
children>>
[
gadget>word
]
map
]
[
margin>>
]
bi
wrap-words
[
<line>
]
map!
;