| line |
l |
!l |
condition |
|
30
|
0 |
0 |
$style->{'font-style'} // "normal" |
|
31
|
0 |
0 |
$style->{'font-weight'} // "normal" |
|
35
|
0 |
0 |
$style->{'font-family'} // [] |
|
39
|
0 |
0 |
$style->{'@font-face'} // [] |
|
58
|
0 |
0 |
$style->{'font-size'} || 12 |
|
94
|
0 |
0 |
$style->{'font-size'} || 12 |
|
105
|
0 |
0 |
$style->{'font-size'} || 12 |
|
119
|
0 |
0 |
$style->{'font-size'} || 12 |
|
138
|
0 |
0 |
$style->{'font-size'} || 12 |
|
145
|
0 |
0 |
$style->{'font-family'} // "Times-Roman" |
|
146
|
0 |
0 |
$style->{'font-size'} || 12 |
|
148
|
0 |
0 |
$style->{'font-style'} && $style->{'font-style'} =~ /^(italic|oblique)$/u || '' |
|
150
|
0 |
0 |
$style->{'font-weight'} && $style->{'font-weight'} =~ /^(bold|black)$/u || '' |
|
196
|
0 |
0 |
$style->{'font-family'} // "" |
| line |
l |
!l&&r |
!l&&!r |
condition |
|
71
|
0 |
0 |
0 |
$td //= tempdir("CLEANUP", 1) |
|
155
|
0 |
0 |
0 |
$fn eq "text" or $fn =~ /^mono(?:-?space)?$/u |
|
|
0 |
0 |
0 |
$fn =~ /^abc2svg(?:\.ttf)?/u or $fn eq "music" |
|
190
|
0 |
0 |
0 |
$fc->{$fn} //= do {
unless ($fn =~ /\.\w+$/u) {
my $t = "";
$t .= "italic, " if $em;
$t .= "bold, " if $bd;
$t = " (" . substr($t, 0, length($t) - 2) . ")" if $t;
warn "SVG: Font ", $style->{'font-family'} // "", "$t - falling back to built-in font $fn with limited glyphs!\n";
} ;
+{"font", $svg->pdf->font($fn), "src", $fn}
} |