Branch Coverage

blib/lib/MooX/TaggedAttributes.pm
Criterion Covered Total %
branch 31 44 70.4


line true false branch
40 57 8 if Moo::Role::does_role($target, "MooX::TaggedAttributes::Propagate")
59 5 57 if $APPLIED_ROLE{$ltarget}{$role}++
81 0 30 unless exists $ARGS{$arg}
82 22 8 defined $ARGS{$arg} ? :
85 18 0 unless Moo::Role::does_role($target, "MooX::TaggedAttributes::Role")
88 0 18 unless %args
90 18 0 if (defined $args{"-tags"})
92 4 14 unless "ARRAY" eq ref $args{"-tags"}
96 18 0 if @{$args{"-tags"};}
99 8 10 if (defined $args{"-propagate"} and $args{"-propagate"})
133 0 97 unless "Moo::Role"->is_role($role)
136 40 57 unless (Moo::Role::does_role($target, $role))
138 13 27 if ('Moo::Role'->is_role($target)) { }
150 0 27 if ($^V lt v5.14) { }
153 0 0 if ($pkg->has_symbol('&import')) { }
163 0 0 if $e ne ""
170 27 0 unless defined *{$glob;}{"CODE"}
207 88 27 unless exists $TAGSTORE{$target}
214 22 93 if (my $handler = $opt{"-handler"} // defined $opt{'-class'} && $TAGHANDLER{$opt{'-class'}})
217 18 4 'ARRAY' eq ref $handler ? :
281 0 103 ref $attrs ? :
297 51 52 $is_role ? :