| line |
true |
false |
branch |
|
20
|
0 |
21 |
if (@book) |
|
21
|
0 |
0 |
if $main::options->{'backend-option'}{'tidy'} |
|
51
|
0 |
21 |
if ($main::options->{'backend-option'}{'structure'} // "") eq "structured" |
|
56
|
21 |
0 |
if defined $s->{'title'} |
|
57
|
6 |
15 |
if (defined $s->{'subtitle'}) |
|
61
|
0 |
21 |
if $tidy |
|
68
|
54 |
255 |
if ($elt->{'context'} ne $ctx) |
|
69
|
24 |
30 |
if $ctx |
|
70
|
30 |
24 |
if $ctx = $elt->{'context'} |
|
73
|
81 |
228 |
if ($elt->{'type'} eq "empty") |
|
75
|
0 |
81 |
if $s->{'structure'} eq "structured" |
|
80
|
3 |
225 |
if ($elt->{'type'} eq "colb") |
|
85
|
3 |
222 |
if ($elt->{'type'} eq "newpage") |
|
90
|
105 |
117 |
if ($elt->{'type'} eq "songline") |
|
95
|
24 |
93 |
if ($elt->{'type'} eq "tabline") |
|
100
|
0 |
93 |
if ($elt->{'type'} eq "chorus") |
|
101
|
0 |
0 |
if $tidy |
|
104
|
0 |
0 |
if ($e->{'type'} eq "empty") |
|
108
|
0 |
0 |
if ($e->{'type'} eq "songline") |
|
114
|
0 |
0 |
if $tidy |
|
118
|
15 |
78 |
if ($elt->{'type'} eq "rechorus") |
|
119
|
15 |
0 |
if ($rechorus->{'quote'}) { } |
|
|
0 |
0 |
elsif ($rechorus->{'type'} and $rechorus->{'tag'}) { } |
|
131
|
0 |
78 |
if ($elt->{'type'} eq "tab") |
|
132
|
0 |
0 |
if $tidy |
|
136
|
0 |
0 |
if $tidy |
|
140
|
0 |
78 |
if ($elt->{'type'} eq "verse") |
|
141
|
0 |
0 |
if $tidy |
|
144
|
0 |
0 |
if ($e->{'type'} eq "empty") |
|
146
|
0 |
0 |
if $s->{'structure'} eq "structured" |
|
149
|
0 |
0 |
if ($e->{'type'} eq "songline") |
|
153
|
0 |
0 |
if ($e->{'type'} eq "comment") |
|
157
|
0 |
0 |
if ($e->{'type'} eq "comment_italic") |
|
163
|
0 |
0 |
if $tidy |
|
167
|
42 |
36 |
if ($elt->{'type'} =~ /^comment(?:_italic|_box)?$/) |
|
168
|
0 |
42 |
if $tidy |
|
170
|
12 |
30 |
if ($elt->{'chords'}) |
|
174
|
12 |
12 |
if $elt->{'chords'}[$_] ne "" |
|
180
|
0 |
42 |
if $tidy |
|
184
|
0 |
36 |
if ($elt->{'type'} eq "image") |
|
190
|
0 |
0 |
unless /\s/ |
|
197
|
33 |
3 |
if ($elt->{'type'} eq "set") |
|
198
|
0 |
33 |
if ($elt->{'name'} eq 'lyrics-only') { } |
|
|
3 |
30 |
elsif ($elt->{'name'} =~ /^(text\..+)/) { } |
|
200
|
0 |
0 |
unless $lyrics_only > 1 |
|
217
|
0 |
3 |
if ($elt->{'type'} eq "control") |
|
220
|
6 |
15 |
if $ctx |
|
232
|
43 |
62 |
if ($lyrics_only or $single_space and not $elt->{'chords'} && join('', map({$_ ? $_->key : '';} @{$$elt{'chords'};})) =~ /\S/) |
|
241
|
8 |
54 |
unless ($elt->{'chords'}) |
|
245
|
0 |
54 |
if (my $f = $main::config->{'settings'}{'inline-chords'}) |
|
246
|
0 |
0 |
unless $f =~ /^[^%]*\%s[^%]*$/ |
|
250
|
0 |
0 |
$elt->{'chords'}[$_] ? : |
|
259
|
150 |
54 |
if ref $elt->{'chords'}[$c] |
|
262
|
4 |
200 |
if $d > 0 |
|
263
|
198 |
6 |
if $d < 0 |
|
266
|
0 |
54 |
$chords_under ? : |
|
273
|
0 |
150 |
unless length $c |
|
276
|
0 |
150 |
$c->info->is_annotation ? : |
|
299
|
0 |
474 |
unless length $fragment->{'text'} |