| line |
true |
false |
branch |
|
169
|
17 |
3 |
unless $name =~ s/^\+// |
|
222
|
3 |
5 |
if $default_resultset_class |
|
226
|
0 |
8 |
if scalar keys %args |
|
230
|
15 |
1 |
if $arg and not ref $arg |
|
232
|
0 |
16 |
if ref $arg ne 'ARRAY' |
|
269
|
2 |
113 |
if ($preset_resultset_class and $preset_resultset_class ne 'DBIx::Class::ResultSet') { } |
|
|
9 |
104 |
elsif ($found_resultset_class ||= $default_resultset_class) { } |
|
270
|
0 |
2 |
if ($found_resultset_class and $found_resultset_class ne $preset_resultset_class) |
|
279
|
2 |
7 |
unless ($found_resultset_class->isa('DBIx::Class::ResultSet')) |
|
348
|
261 |
1 |
if (@params) { } |
|
350
|
0 |
10027 |
if (ref $param eq 'ARRAY') { } |
|
|
257 |
9770 |
elsif (ref $param eq 'HASH') { } |
|
367
|
9256 |
514 |
unless $param =~ /^#/ |
|
379
|
0 |
262 |
unless $comps_for{$prefix} |
|
384
|
1 |
11622 |
unless ($snsub) |
|
608
|
1 |
9166 |
unless defined $source_name |
|
649
|
1 |
114551 |
unless $source_name |
|
683
|
343614 |
0 |
if defined $_ |
|
691
|
114538 |
229076 |
length ref $_ ? : |
|
751
|
24 |
454 |
unless $self->storage |
|
767
|
0 |
1129 |
unless $self->storage |
|
784
|
0 |
12 |
unless $self->storage |
|
801
|
0 |
5 |
unless $self->storage |
|
818
|
0 |
6 |
unless $self->storage |
|
871
|
0 |
7680 |
unless my $rs = $self->resultset($name) |
|
904
|
0 |
463 |
if not @info and $self->storage |
|
906
|
0 |
463 |
ref $self->storage_type ? : |
|
926
|
2 |
461 |
if (my $checker = $self->schema_sanity_checker) |
|
935
|
0 |
0 |
if (ref $storage_type eq 'ARRAY') { } |
|
|
0 |
0 |
elsif (ref $storage_type eq 'HASH') { } |
|
1053
|
0 |
17 |
unless $self->storage |
|
1070
|
0 |
6 |
unless $self->storage |
|
1087
|
0 |
12 |
unless $self->storage |
|
1114
|
5 |
455 |
ref $self ? : |
|
|
1 |
459 |
@_ == 1 && ref $_[0] eq 'HASH' ? : |
|
1138
|
5 |
455 |
if ($from->storage) |
|
1162
|
19 |
2564 |
if (not &DBIx::Class::_Util::in_internal_try() and my $act = $self->exception_action) |
|
1171
|
18 |
1 |
if $guard_disarmed |
|
1193
|
1 |
2 |
if (&$act(@args)) { } |
|
1251
|
0 |
0 |
unless $self->storage |
|
1275
|
0 |
1 |
unless $self->storage |
|
1300
|
0 |
0 |
unless $self->storage |
|
1341
|
0 |
1 |
if $preversion |
|
1505
|
39571 |
11747 |
if length(my $schema_class = ref $self) |
|
1511
|
20616 |
30702 |
if $params->{'extra'} |
|
1514
|
30700 |
2 |
if ($result_class = $derived_rsrc->result_class and $result_class_level_rsrc = &dbic_internal_try(sub {
$result_class->result_source_instance;
}
)) |
|
1530
|
1 |
50 |
if exists $map{$result_class} and $map{$result_class} ne $source_name and $result_class_level_rsrc != $supplied_rsrc |
|
1540
|
1 |
18948 |
if (length $schema_class and $schema_class_level_rsrc = &dbic_internal_try(sub {
$schema_class->source($source_name);
}
) and grep {$_ == $derived_rsrc;} $result_class_level_rsrc->__derived_instances and keys %{{} unless $schema_class_level_rsrc->{'__metadata_divergencies'};}) |
|
1558
|
0 |
9813 |
unless $schema_class_level_rsrc->{'__metadata_divergencies'} |
|
1585
|
0 |
477 |
if $global_phase_destroy ||= &in_global_destruction() |
|
1598
|
18 |
20926 |
if (length ref $srcs->{$source_name} and &refcount($srcs->{$source_name}) > 1) |
|
1599
|
0 |
18 |
if $SIG{'__DIE__'} |
|
1605
|
0 |
18 |
unless (eval {
do {
$srcs->{$source_name}->schema($self);
&weaken($srcs->{$source_name});
1
}
}) |
|
1625
|
3 |
0 |
if ($source->result_class) |
|
1671
|
1 |
0 |
unless $INC{'DBIx/Class/CDBICompat.pm'} |
|
1681
|
0 |
1 |
if ($self eq $target) |