| line |
true |
false |
branch |
|
97
|
67 |
3 |
unless (exists $merged->{'extra'})
|
|
103
|
12 |
327 |
if ($key =~ /^-(.*)/u) { }
|
|
|
0 |
327 |
elsif ($key eq 'many') { }
|
|
|
0 |
327 |
elsif ($key eq 'might') { }
|
|
|
0 |
327 |
elsif ($key eq 'one') { }
|
|
|
0 |
327 |
elsif ($key eq 'across') { }
|
|
134
|
13 |
267 |
if (exists $merged->{$alias})
|
|
140
|
4 |
66 |
if (exists $merged->{'default_sql'})
|
|
141
|
1 |
3 |
if (not defined $merged->{'default_sql'}) { }
|
|
151
|
70 |
0 |
unless (scalar keys %{$$merged{'_smooth'}})
|
|
154
|
60 |
10 |
unless (scalar keys %{$$merged{'extra'}})
|
|
163
|
73 |
129 |
if (exists $first->{$key} and not exists $second->{$key}) { }
|
|
|
129 |
0 |
elsif (not exists $first->{$key} and exists $second->{$key}) { }
|
|
170
|
0 |
0 |
if (ref $first->{$key} ne 'HASH' and $second->{$key} ne 'HASH') { }
|
|
193
|
0 |
0 |
if &any(sub {
$key eq $_;
}
, @approved_keys)
|
|
285
|
0 |
3 |
if (exists $settings{'extra'} and exists $settings{'extra'}{'list'}) { }
|
|
|
3 |
0 |
elsif (exists $settings{'-list'}) { }
|