| blib/lib/ChordPro/Output/Common.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 23 | 35 | 65.7 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 29 | 1204 | 796 | 115 | $m->{'key'} and $m->{'capo'} |
| 796 | 0 | 115 | $m->{'key'} and $m->{'capo'} and my $capo = $m->{'capo'}[-1] | |
| 107 | 0 | 0 | 32 | 0 < $arg and $arg < 4000 |
| 111 | 96 | 0 | 32 | 1 <= $digit and $digit <= 3 |
| 96 | 0 | 0 | 6 <= $digit and $digit <= 8 | |
| 144 | 0 | 0 | 37 | $book and @$book |
| 150 | 27 | 2 | 8 | @fields == 1 and $fields[0] eq "songindex" |
| line | l | !l | condition |
|---|---|---|---|
| 36 | 0 | 2115 | $m->{'tuning'} //= [join(" ", ChordPro::Chords::get_tuning())] |
| 52 | 0 | 2115 | $m->{'today'} //= [strftime($main::config->{'dates'}{'today'}{'format'}, localtime time)] |
| 238 | 168 | 0 | shift @$split // "" |
| 279 | 194 | 0 | $t->{'meta'}{$_}[0] // "" |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 35 | 875 | 36 | 1204 | $m->{'key_actual'} //= $m->{'key'} |
| 245 | 12 | 158 | 1 | $s->[1] // $s->[0] |