blib/lib/metaclass.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 11 | 12 | 91.6 |
line | true | false | branch |
---|---|---|---|
13 | 419 | 7622 | if @args % 2 == 1 |
16 | 3 | 8038 | exists $options{'meta_name'} ? : |
19 | 419 | 7622 | if (defined $metaclass) { } |
25 | 2 | 8039 | unless $metaclass->isa("Class::MOP::Class") |
30 | 38 | 0 | unless (ref(my $class = $options{$key})) |
39 | 8034 | 2 | if defined $meta_name |