Branch Coverage

blib/lib/Abilities.pm
Criterion Covered Total %
branch 23 28 82.1


line true false branch
197 4 12 if $self->is_super
200 1 11 unless $self->abilities->{$action}
203 4 7 if ($constraint and $constraint ne '_all_') { }
205 2 2 unless ref $self->abilities->{$action}
209 2 0 if (ref $self->abilities->{$action} eq 'ARRAY') { }
210 1 1 if $constraint eq '_any_'
214 1 0 if $_ eq $constraint
224 1 6 if ref $self->abilities->{$action}
242 0 5 unless $role
245 2 3 if $_ eq $role
264 0 5 unless $role
267 2 2 if $$_[0] eq $role or $$_[1]->does_role($role)
291 88 43 if (not ref $_) { }
43 0 elsif (ref $_ eq 'ARRAY' and scalar @$_ == 2) { }