cached-wrapped ( paragraph -- wrapped-paragraph )


Vocabulary
ui.gadgets.paragraphs.private

Inputs
paragraphan object


Outputs
wrapped-paragraphan object


Definition
USING: accessors kernel ;

IN: ui.gadgets.paragraphs.private

: cached-wrapped ( paragraph -- wrapped-paragraph )
[ wrapped>> ] [ [ wrap-paragraph dup ] keep wrapped<< ]
?unless ;