Branch Coverage

blib/lib/DBIx/Class/KiokuDB.pm
Criterion Covered Total %
branch 22 36 61.1


line true false branch
23 3 9 if ($col_info->{'_kiokudb_info'} and ref(my $obj = $self->get_column($key)))
41 3 0 if ref $_
2 2 if (my(@insert) = grep({not $lo->object_to_entry($_) if ref $_;} values %{$$self{'_kiokudb_column'};}))
58 2 0 if ref $_
1 3 if (my(@insert) = grep({not $lo->object_to_entry($_) if ref $_;} values %{$$self{'_kiokudb_column'};}))
72 1 0 if (my(@objects) = grep({ref $_;} values %{$$self{'_kiokudb_column'};}))
88 2 0 unless exists $attrs->{'is_foreign_key_constraint'}
90 0 2 defined $cond ? :
99 2 0 unless defined $accessor
107 5 0 if (ref(my $obj = $self->result_source->schema->kiokudb_handle->lookup($id))) { }
110 0 0 unless ref $obj
117 0 4 unless ref $object
121 1 3 if (my $id = $dir->object_to_id($object)) { }
140 0 9 unless exists $self->column_info($col)->{'_kiokudb_info'}
143 4 5 if defined $self->{'_kiokudb_column'}{$col}
145 5 0 if (defined(my $val = $self->get_column($col))) { }
146 0 5 ref $val ? :
161 4 0 if (ref $obj) { }