| blib/lib/MooX/Aliases.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 16 | 18 | 88.8 |
| line | true | false | branch |
|---|---|---|---|
| 14 | 0 | 10 | unless my $around = do { no strict 'refs'; \&{"${target}::around";} } |
| 19 | 1 | 24 | unless ($target->can($to)) |
| 42 | 1 | 15 | unless $aliases |
| 45 | 6 | 9 | unless ref $aliases |
| 48 | 0 | 15 | defined $opts{'init_arg'} ? : |
| 50 | 12 | 3 | if (not exists $opts{'init_arg'} or defined $opts{'init_arg'}) |
| 61 | 9 | 6 | unless ($installed_buildargs) |
| 69 | 1 | 24 | if (@init > 1) { } |
| 7 | 17 | elsif (@init == 1) { } |