| blib/lib/MooX/Aliases.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 20 | 22 | 90.9 |
| line | true | false | branch |
|---|---|---|---|
| 14 | 0 | 10 | unless my $around = do { no strict 'refs'; \&{"${target}::around";} } |
| 19 | 1 | 25 | unless ($target->can($to)) |
| 41 | 8 | 12 | if $aliases and not ref $aliases |
| 44 | 3 | 17 | unless $aliases and @$aliases |
| 49 | 1 | 1 | @{$attr;} == 1 ? : |
| 15 | 2 | !ref($attr) ? : | |
| 54 | 0 | 16 | defined $opts{'init_arg'} ? : |
| 56 | 13 | 3 | if (not exists $opts{'init_arg'} or defined $opts{'init_arg'}) |
| 67 | 9 | 7 | unless ($installed_buildargs) |
| 75 | 1 | 26 | if (@init > 1) { } |
| 7 | 19 | elsif (@init == 1) { } |