lib/Unexpected/TraitFor/ExceptionClasses.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 22 | 22 | 100.0 |
line | true | false | branch |
---|---|---|---|
39 | 1 | 14 | unless defined $class |
41 | 1 | 13 | if exists $Classes->{$class} |
44 | 4 | 9 | if ref $args ne 'HASH' |
48 | 7 | 6 | if ref $parents ne 'ARRAY' |
51 | 1 | 14 | unless exists $Classes->{$parent} |
60 | 16 | 6 | $_[1] && !ref($_[1]) && exists $$Classes{$_[1]} ? : |
65 | 1 | 10 | unless $wanted |
67 | 1 | 9 | if ref $wanted eq 'CODE' |
69 | 1 | 9 | unless exists $Classes->{$wanted} |
75 | 7 | 15 | if $class eq $wanted |
77 | 12 | 3 | if exists $Classes->{$class}{'parents'} |