blib/lib/Git/PurePerl/NewObject/Blob.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
statement | 12 | 12 | 100.0 |
branch | n/a | ||
condition | n/a | ||
subroutine | 4 | 4 | 100.0 |
pod | n/a | ||
total | 16 | 16 | 100.0 |
line | stmt | bran | cond | sub | pod | time | code |
---|---|---|---|---|---|---|---|
1 | package Git::PurePerl::NewObject::Blob; | ||||||
2 | 4 | 4 | 14 | use Moose; | |||
4 | 5 | ||||||
4 | 21 | ||||||
3 | 4 | 4 | 16177 | use MooseX::StrictConstructor; | |||
4 | 5 | ||||||
4 | 25 | ||||||
4 | 4 | 4 | 7535 | use Moose::Util::TypeConstraints; | |||
4 | 5 | ||||||
4 | 30 | ||||||
5 | 4 | 4 | 4811 | use namespace::autoclean; | |||
4 | 6 | ||||||
4 | 30 | ||||||
6 | |||||||
7 | extends 'Git::PurePerl::NewObject'; | ||||||
8 | |||||||
9 | has 'kind' => | ||||||
10 | ( is => 'ro', isa => 'ObjectKind', required => 1, default => 'blob' ); | ||||||
11 | |||||||
12 | __PACKAGE__->meta->make_immutable; | ||||||
13 | |||||||
14 | 1; |