| line |
true |
false |
branch |
|
33
|
0 |
8 |
if $regtest |
|
53
|
8 |
0 |
if ($self->{'pdf'}->can('info_metadata')) { } |
|
66
|
0 |
8 |
$regtest ? : |
|
83
|
0 |
0 |
unless defined $s |
|
85
|
0 |
0 |
if ($s =~ /\S/) |
|
99
|
684 |
744 |
if (not defined $col or $col =~ /^foreground(?:-medium|-light)?$/) { } |
|
|
0 |
744 |
elsif ($col eq 'background') { } |
|
|
0 |
744 |
elsif (not $col) { } |
|
113
|
732 |
0 |
if (not defined $col or $col eq 'background') { } |
|
|
0 |
0 |
elsif ($col =~ /^foreground(?:-medium|-light)?$/) { } |
|
|
0 |
0 |
elsif (not $col) { } |
|
136
|
0 |
1243 |
if (/\x{266f}/) |
|
137
|
0 |
0 |
unless ($font->{'has_sharp'} //= $font->{'fd'}{'font'}->glyphByUni(9839) ne ".notdef") |
|
142
|
0 |
1243 |
if (/\x{266d}/) |
|
143
|
0 |
0 |
unless ($font->{'has_flat'} //= $font->{'fd'}{'font'}->glyphByUni(9837) ne ".notdef") |
|
164
|
0 |
684 |
if ($nomarkup) { } |
|
178
|
0 |
684 |
if (ref $e eq 'ARRAY') { } |
|
|
684 |
0 |
elsif ($yflip //= _yflip()) { } |
|
187
|
684 |
0 |
if $bgcol and $bgcol =~ /^no(?:ne)?$/i |
|
188
|
0 |
684 |
$ENV{'CHORDPRO_DEBUG_TEXT'} ? : |
|
190
|
0 |
684 |
if $frame and $frame =~ /^no(?:ne)?$/i |
|
191
|
0 |
684 |
if ($bgcol or $frame) |
|
192
|
0 |
0 |
if $debug |
|
195
|
0 |
0 |
$debug ? : |
|
196
|
0 |
0 |
if $frame |
|
214
|
0 |
682 |
unless $size ||= $font->{'size'} |
|
288
|
0 |
0 |
if $strokecolor |
|
289
|
0 |
0 |
if $fillcolor |
|
293
|
0 |
0 |
if $fillcolor and not $strokecolor |
|
294
|
0 |
0 |
if $fillcolor and $strokecolor |
|
295
|
0 |
0 |
if $strokecolor and not $fillcolor |
|
301
|
0 |
0 |
unless $lw |
|
304
|
0 |
0 |
if $strokecolor |
|
305
|
0 |
0 |
if $fillcolor |
|
310
|
0 |
0 |
if $fillcolor and not $strokecolor |
|
311
|
0 |
0 |
if $fillcolor and $strokecolor |
|
312
|
0 |
0 |
if $strokecolor and not $fillcolor |
|
320
|
240 |
0 |
if $strokecolor |
|
321
|
192 |
48 |
if $fillcolor |
|
324
|
192 |
48 |
if $fillcolor |
|
325
|
240 |
0 |
if $strokecolor |
|
333
|
48 |
0 |
if $strokecolor |
|
338
|
48 |
0 |
if $strokecolor |
|
341
|
48 |
0 |
if $strokecolor |
|
349
|
0 |
0 |
if $strokecolor |
|
353
|
0 |
0 |
if $strokecolor |
|
356
|
0 |
0 |
if $strokecolor |
|
365
|
0 |
0 |
if $main::config->{'debug'}{'images'} |
|
366
|
0 |
0 |
if ($uri =~ /^id=(.+)/) |
|
369
|
0 |
0 |
if ($a->{'type'} eq 'abc') { } |
|
|
0 |
0 |
elsif ($a->{'type'} eq 'jpg') { } |
|
|
0 |
0 |
elsif ($a->{'type'} eq 'png') { } |
|
|
0 |
0 |
elsif ($a->{'type'} eq 'gif') { } |
|
385
|
0 |
0 |
if /\.png$/i |
|
386
|
0 |
0 |
if /\.jpe?g$/i |
|
387
|
0 |
0 |
if /\.gif$/i |
|
399
|
0 |
0 |
if ($border) |
|
414
|
10 |
57 |
if $page == $self->{'pdf'}->pages + 1 |
|
422
|
0 |
67 |
unless ($ps->{'theme'}{'background'} =~ /^white|none|#ffffff$/i) |
|
445
|
0 |
0 |
unless $bg |
|
446
|
0 |
0 |
if $pg > $bg->pages |
|
456
|
0 |
0 |
unless $pdf |
|
469
|
22 |
0 |
if ($c) { } |
|
470
|
0 |
14 |
$style eq 'alpha' ? : |
|
|
0 |
14 |
$style eq 'Alpha' ? : |
|
|
8 |
14 |
$style eq 'roman' ? : |
|
|
0 |
22 |
$style eq 'Roman' ? : |
|
|
6 |
16 |
defined $prefix ? : |
|
479
|
0 |
0 |
defined $prefix ? : |
|
488
|
0 |
8 |
unless $book and @$book |
|
497
|
0 |
16 |
unless @$book |
|
505
|
0 |
16 |
if (@{$self->{'ps'}{'outlines'};} == 1) { } |
|
507
|
0 |
0 |
if $ctl->{'collapse'} |
|
512
|
0 |
16 |
if $ctl->{'collapse'} |
|
517
|
16 |
0 |
if ($ctl->{'letter'} > 0) |
|
530
|
0 |
16 |
if ($needlh) { } |
|
535
|
0 |
0 |
unless (defined $cur_ol and $cur_let eq $let) |
|
545
|
0 |
0 |
if (my $c = $ol->can('destination')) { } |
|
561
|
48 |
0 |
if (my $c = $ol->can('destination')) { } |
|
575
|
8 |
0 |
if ($file and $file ne '-') { } |
|
595
|
0 |
40 |
if $d[-2] eq "fonts/" |
|
597
|
40 |
40 |
unless $fontdir |
|
599
|
40 |
0 |
if (-d $fontdir) { } |
|
617
|
0 |
520 |
if (UNIVERSAL::isa($v, 'HASH')) { } |
|
625
|
0 |
160 |
if @fam > 1 |
|
629
|
0 |
680 |
unless $self->init_font($ff) |
|
632
|
0 |
40 |
if $fail |
|
639
|
40 |
640 |
if ($ps->{'fonts'}{$ff}{'file'}) { } |
|
|
0 |
640 |
elsif ($ps->{'fonts'}{$ff}{'description'}) { } |
|
|
640 |
0 |
elsif ($ps->{'fonts'}{$ff}{'name'}) { } |
|
648
|
0 |
680 |
unless $fd |
|
662
|
0 |
0 |
if $regtest |
|
665
|
0 |
0 |
if $font->{'fd'}->get_size |
|
680
|
0 |
40 |
if $regtest |
|
693
|
0 |
640 |
unless $cf |
|
715
|
0 |
0 |
unless -f $file |
|
724
|
0 |
0 |
if ($cname) { } |
|
739
|
0 |
0 |
if ($rname) { } |
|
757
|
10 |
0 |
unless $cname |