File Coverage

blib/lib/KiokuDB/Role/ID/Digest.pm
Criterion Covered Total %
statement 7 7 100.0
branch n/a
condition n/a
subroutine 3 3 100.0
pod 0 1 0.0
total 10 11 90.9


line stmt bran cond sub pod time code
1             package KiokuDB::Role::ID::Digest;
2 3     3   1827 use Moose::Role;
  3         3240  
  3         18  
3              
4 3     3   11249 use namespace::clean -except => 'meta';
  3         6  
  3         18  
5              
6             with qw(
7             KiokuDB::Role::ID::Content
8             KiokuDB::Role::WithDigest
9             );
10              
11 132     132 0 3972 sub kiokudb_object_id { shift->digest }
12              
13             #has '+digest' => ( traits => [qw(KiokuDB::ID)] ); # to avoid data redundancy?
14              
15             __PACKAGE__
16              
17             __END__