p

Vocabulary

pdf.layout

Definition

IN: pdf.layout

TUPLE: p string style ;

Methods

USING: accessors kernel pdf.canvas pdf.layout pdf.wrap sequences
;

M: p pdf-render
    [ style>> set-style ] keep [
        over ?line-break over [ font>> ] [ avail-width ] bi
        visual-wrap over avail-lines index-or-length cut
        [ draw-text ] [ "" concat-as ] bi*
    ] change-string dup string>> empty? [ drop f ] when ;


USING: accessors kernel pdf.canvas pdf.layout sequences
splitting ui.text ;

M: p pdf-width
    [ style>> set-style ] keep [ font>> ] [ string>> ] bi*
    split-lines [ dupd text-width ] map nip maximum ;