blib/lib/DBIx/Class/Relationship/CascadeActions.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 10 | 12 | 83.3 |
line | true | false | branch |
---|---|---|---|
17 | 0 | 116 | unless ref $self |
26 | 80 | 36 | if (@cascade) |
32 | 265 | 9 | if (my $rel_rs = &dbic_internal_try(sub { $self->related_resultset($rel); } )) { } |
49 | 0 | 822 | unless ref $self |
56 | 96 | 726 | if (@cascade) |
67 | 210 | 1 | if $rels{$rel}{'attrs'}{'accessor'} and $rels{$rel}{'attrs'}{'accessor'} eq 'single' and not exists $self->{'_relationship_data'}{$rel} |