| 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)
|