blib/lib/File/Assets/Kind.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 10 | 14 | 71.4 |
line | true | false | branch |
---|---|---|---|
11 | 0 | 212 | unless $$self{'kind'} = my $kind = shift() |
14 | 17 | 195 | unless ($type) |
19 | 200 | 12 | unless defined $kind[1] |
35 | 0 | 0 | if $self->kind eq $other->kind |
44 | 0 | 4 | unless 'File::Assets::Util'->same_type($self->type, $other->type) |
47 | 2 | 2 | if (length $self_tail and length $other_tail) |
48 | 1 | 1 | unless 0 == index($self->tail, $other->tail) or 0 == index($other->tail, $self->tail) |