| blib/lib/App/DBCritic.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 4 | 12 | 33.3 |
| line | true | false | branch |
|---|---|---|---|
| 27 | 0 | 0 | unless $self->has_schema |
| 48 | 0 | 1 | if (my $class_name = $self->class_name) |
| 49 | 0 | 0 | if eval "require $class_name" |
| 59 | 6 | 1 | if &blessed($schema) and $schema->isa('DBIx::Class::Schema') |
| 62 | 0 | 0 | if (not $_[0] =~ / has no primary key at /msu) |
| 66 | 1 | 0 | if 'ARRAY' eq ref $schema |