File Coverage

blib/lib/Test/Shared/Fixture/Wikibase/Datatype/MediainfoSnak/Commons/Depicts/Human.pm
Criterion Covered Total %
statement 16 16 100.0
branch n/a
condition n/a
subroutine 5 5 100.0
pod 1 1 100.0
total 22 22 100.0


line stmt bran cond sub pod time code
1             package Test::Shared::Fixture::Wikibase::Datatype::MediainfoSnak::Commons::Depicts::Human;
2              
3 9     9   349908 use base qw(Wikibase::Datatype::MediainfoSnak);
  9         53  
  9         4183  
4 9     9   72 use strict;
  9         22  
  9         317  
5 9     9   62 use warnings;
  9         35  
  9         277  
6              
7 9     9   4900 use Test::Shared::Fixture::Wikibase::Datatype::Value::Item::Wikidata::DouglasAdams;
  9         35  
  9         1036  
8              
9             our $VERSION = 0.30;
10              
11             sub new {
12 3     3 1 135 my $class = shift;
13              
14 3         38 my @params = (
15             'datavalue' => Test::Shared::Fixture::Wikibase::Datatype::Value::Item::Wikidata::DouglasAdams->new,
16             'property' => 'P180',
17             );
18              
19 3         26 my $self = $class->SUPER::new(@params);
20              
21 3         37 return $self;
22             }
23              
24             1;
25              
26             __END__