| blib/lib/Role/EventEmitter.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 10 | 12 | 83.3 |
| line | true | false | branch |
|---|---|---|---|
| 10 | 1 | 0 | if $_[0]->on('error', $_[1]) |
| 15 | 29 | 2 | if (my $s = $self->{'_role_ee_events'}{$name}) { } |
| 21 | 1 | 1 | if $name eq 'error' |
| 29 | 19 | 0 | if push @{$_[0]{'_role_ee_events'}{$_[1]};}, $_[2] |
| 52 | 14 | 1 | if ($cb) { } |
| 54 | 9 | 5 | unless @{$self->{'_role_ee_events'}{$name};} |