Handbook Glossary
factorcode.org
draw-background ( canvas line -- )


Vocabulary
pdf.canvas

Inputs
canvasan object
linean object


Outputs
None

Definition
USING: accessors io kernel math pdf.text sequences ui.text ;

IN: pdf.canvas

: draw-background ( canvas line -- )
over background>> [
"0.0 G" print foreground-color
[ drop [ x ] [ y ] bi ]
[ [ font>> ] [ text-dim first2 neg ] bi* ] 2bi rectangle
fill
] [ 2drop ] if* ;