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