| blib/lib/DBICx/Hooks/Registry.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 17 | 18 | 94.4 |
| line | true | false | branch |
|---|---|---|---|
| 25 | 1 | 12 | unless $source |
| 28 | 1 | 11 | unless $action |
| 30 | 1 | 5 | unless $action eq 'create' or $action eq 'update' or $action eq 'delete' |
| 36 | 2 | 8 | unless $cb |
| 38 | 1 | 7 | unless ref $cb eq 'CODE' |
| 52 | 10 | 4 | if exists $registry{$source} and exists $registry{$source}{$action} |
| 55 | 11 | 3 | if wantarray |
| 61 | 17 | 10 | unless blessed $t |
| 62 | 10 | 0 | if $t->can('result_source') |