| line |
true |
false |
branch |
|
43
|
0 |
1 |
if grep {not $plugin->can($_);} 'init' |
|
47
|
0 |
1 |
if ($x->info->style eq 'implicit') { } |
|
49
|
0 |
0 |
if (reftype $plugin eq 'ARRAY') { } |
|
50
|
0 |
0 |
if do {
local $@;
eval {
do {
tied @{$plugin;}
}
}
} |
|
52
|
0 |
0 |
if overload::Method($plugin, '@{}') |
|
57
|
1 |
2 |
if $x->info->style eq $style |
|
72
|
0 |
0 |
unless $plugin->can($method) |
|
74
|
0 |
0 |
unless @{$self->methods->{$method};} |
|
85
|
0 |
1 |
if not $x or grep {not $x->can($_);} 'list', 'plugin', 'exists', 'merge', 'unmerge', 'info' |
|
88
|
0 |
3 |
if 'Object::Meta::Plugin::Host::Context'->UNIVERSAL::can($method) |
|
89
|
0 |
3 |
unless $x->plugin->can($method) |
|
97
|
0 |
1 |
exists $self->plugins->{$x->plugin} ? : |
|
104
|
0 |
0 |
if not $x or grep {not $x->can($_);} 'list', 'plugin' |
|
109
|
0 |
0 |
unless $self->stack($method) |
|
113
|
0 |
0 |
unless @{$self->stack($method);} |
|
122
|
3 |
4 |
@_ ? : |
|
129
|
0 |
0 |
unless exists $self->plugins->{$plugin} |
|
148
|
0 |
1 |
if 'Object::Meta::Plugin::Host::Context'->UNIVERSAL::can($method) |
|
150
|
0 |
1 |
if $method eq 'DESTROY' |
|
151
|
1 |
0 |
if (my $stack = $self->stack($method)) { } |
|
|
0 |
0 |
elsif ($self->can('super')) { } |
|
182
|
0 |
1 |
if $style eq 'explicit' |
|
184
|
1 |
0 |
if (reftype($self->plugin) eq 'ARRAY') |
|
237
|
0 |
0 |
unless $self->UNIVERSAL::can($method) or $self->plugin->can($method) |
|
245
|
0 |
1 |
if $method eq 'DESTROY' |
|
247
|
1 |
0 |
if (my $code = $self->plugin->can($method)) { } |
|
343
|
0 |
0 |
if $method eq 'DESTROY' |