Branch Coverage

blib/lib/DBIx/Class/Schema.pm
Criterion Covered Total %
branch 80 108 74.0


line true false branch
158 17 3 unless $name =~ s/^\+//
211 3 5 if $default_resultset_class
215 0 8 if scalar keys %args
219 15 1 if $arg and not ref $arg
221 0 16 if ref $arg ne 'ARRAY'
262 2 113 if ($preset_resultset_class and $preset_resultset_class ne 'DBIx::Class::ResultSet') { }
9 104 elsif ($found_resultset_class ||= $default_resultset_class) { }
263 0 2 if ($found_resultset_class and $found_resultset_class ne $preset_resultset_class)
272 2 7 unless ($found_resultset_class->isa('DBIx::Class::ResultSet'))
343 330 1 if (@params) { }
345 0 12966 if (ref $param eq 'ARRAY') { }
325 12641 elsif (ref $param eq 'HASH') { }
362 11993 648 unless $param =~ /^#/
378 0 331 unless $comps_for{$prefix}
383 1 14967 unless ($snsub)
545 1 9131 unless defined $source_name
586 1 100068 unless @_
592 70623 29445 if exists $sreg->{$source_name}
597 69 29376 unless $mapped and exists $sreg->{$mapped}
651 24 442 unless $self->storage
667 0 1125 unless $self->storage
684 0 12 unless $self->storage
701 0 5 unless $self->storage
718 0 6 unless $self->storage
769 0 7657 unless my $rs = $self->resultset($name)
797 0 455 if not @info and $self->storage
799 0 455 ref $self->storage_type ? :
823 0 0 if (ref $storage_type eq 'ARRAY') { }
0 0 elsif (ref $storage_type eq 'HASH') { }
912 18817 0 if ($target_class->can('result_source_instance'))
948 0 17 unless $self->storage
965 0 6 unless $self->storage
982 0 12 unless $self->storage
1009 417 449 ref $self ? :
1 865 @_ == 1 && ref $_[0] eq 'HASH' ? :
1036 8 858 if ($from->storage)
1060 7 2815 if (my $act = $self->exception_action)
1065 6 1 if $guard_disarmed
1087 1 2 if (&$act(@args)) { }
1108 3 3 unless (eval { do { if (&$act(@args)) { $args[0] = "Invocation of the exception_action handler installed on $self did *not*" . ' result in an exception. DBIx::Class is unable to function without a reliable' . ' exception mechanism, ensure that exception_action does not hide exceptions' . " (original error: $args[0])"; } else { carp_unique("The exception_action handler installed on $self returned false instead" . ' of throwing an exception. This behavior has been deprecated, adjust your' . ' handler to always rethrow the supplied error'); } ; $guard_disarmed = 1 } })
1146 0 3 unless $self->storage
1170 0 7 unless $self->storage
1195 0 2 unless $self->storage
1238 2 13 if $preversion
1395 58537 15091 if ref $self
1401 39712 33916 if $params->{'extra'}
1404 33914 2 if ($rs_class and my $rsrc = &try(sub { $rs_class->result_source_instance; } ))
1406 1 50 if (exists $map{$rs_class} and $map{$rs_class} ne $source_name and $rsrc ne $_[2])
1432 0 881 if $global_phase_destroy ||= &in_global_destruction()
1445 16 40052 if (length ref $srcs->{$source_name} and &refcount($srcs->{$source_name}) > 1)
1451 0 16 unless (eval { do { $srcs->{$source_name}->schema($self); &weaken($srcs->{$source_name}); 1 } })
1466 3 0 if ($source->result_class)
1512 1 0 unless $INC{'DBIx/Class/CDBICompat.pm'}
1523 0 1 if ($self eq $target)