| line |
true |
false |
branch |
|
26
|
0 |
24 |
unless $self->{'local_table'}
|
|
27
|
0 |
24 |
unless $self->{'other_table'}
|
|
28
|
0 |
24 |
unless defined $self->{'unique'}
|
|
30
|
0 |
24 |
unless $self->{'local_columns'}
|
|
31
|
0 |
24 |
unless $self->{'other_columns'}
|
|
33
|
0 |
24 |
unless ref $self->{'local_columns'} eq "ARRAY" and @{$self->{'local_columns'};} >= 1
|
|
34
|
0 |
24 |
unless ref $self->{'other_columns'} eq "ARRAY" and @{$self->{'other_columns'};} >= 1
|
|
48
|
0 |
0 |
unless $self->{'local_table'} eq $other->{'local_table'}
|
|
51
|
0 |
0 |
unless $self->{'other_table'} eq $other->{'other_table'}
|
|
54
|
0 |
0 |
unless $self->{'key'} eq $other->{'key'}
|
|
58
|
0 |
0 |
if ($new->{'created'}) { }
|
|
59
|
0 |
0 |
if ($other->{'created'})
|
|
61
|
0 |
0 |
unless $new->{'created'} =~ /\Q$other->{'created'}\E/
|
|
97
|
0 |
0 |
if (builtin::blessed($item)) { }
|
|
98
|
0 |
0 |
if ($item->isa(__PACKAGE__)) { }
|
|
|
0 |
0 |
elsif ($item->isa('DBIx::QuickORM::Schema')) { }
|
|
|
0 |
0 |
elsif ($item->isa('DBIx::QuickORM::Connection')) { }
|
|
|
0 |
0 |
elsif ($item->DOES('DBIx::QuickORM::Role::Source')) { }
|
|
104
|
0 |
0 |
if ($r eq "HASH")
|
|
105
|
0 |
0 |
if ($r eq "SCALAR")
|
|
117
|
0 |
0 |
if $connection
|
|
119
|
0 |
0 |
if (ref $link eq "SCALAR")
|
|
120
|
0 |
0 |
unless $source
|
|
122
|
0 |
0 |
if @extra
|
|
136
|
0 |
0 |
if (@keys == 1)
|
|
140
|
0 |
0 |
unless $val
|
|
143
|
0 |
0 |
unless ($cref)
|
|
148
|
0 |
0 |
if ($cref eq 'ARRAY') { }
|
|
|
0 |
0 |
elsif ($cref eq 'HASH') { }
|
|
159
|
0 |
0 |
$source ? :
|
|
160
|
0 |
0 |
unless $other_table
|
|
163
|
0 |
0 |
if ($schema)
|
|
164
|
0 |
0 |
unless $local = $schema->table($local_table)
|
|
165
|
0 |
0 |
unless $other = $schema->table($other_table)
|
|
171
|
0 |
0 |
unless ref $local_columns
|
|
172
|
0 |
0 |
unless ref $other_columns
|
|
174
|
0 |
0 |
unless ref $local_columns eq "ARRAY" and @$local_columns
|
|
175
|
0 |
0 |
unless ref $other_columns eq "ARRAY" and @$other_columns
|
|
178
|
0 |
0 |
$other->unique->{column_key(@$other_columns)} ? :
|
|
|
0 |
0 |
if $other
|
|
179
|
0 |
0 |
unless defined $unique
|