blib/lib/Mixin/Event/Dispatch/Event.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 4 | 14 | 28.5 |
line | true | false | branch |
---|---|---|---|
88 | 0 | 0 | $_[0]{'is_deferred'} ? : |
97 | 0 | 0 | $_[0]{'is_deferred'} ? : |
130 | 0 | 0 | unless $self->{'remaining'} |
166 | 9 | 0 | if (ref $h) { } |
167 | 9 | 0 | if (&reftype($h) eq 'CODE') { } |
177 | 0 | 9 | unless (eval { do { while (not $self->{'is_deferred'} and @{$self->{'handlers'};}) { local $self->{'current_handler'} = my $h = shift @{$$self{'handlers'};}; if (ref $h) { if (&reftype($h) eq 'CODE') { &$h($self, @_); } else { $h->invoke_event($self->name, @_); }; } else { $self->instance->$h($self, @_); }; }; 1 } }) |
251 | 0 | 1 | unless $self->{'current_handler'} |