File Coverage

blib/lib/Test/Shared/Fixture/Wikibase/Datatype/Snak/Wikidata/Retrieved/Fixture1.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::Snak::Wikidata::Retrieved::Fixture1;
2              
3 42     42   350270 use base qw(Wikibase::Datatype::Snak);
  42         133  
  42         9727  
4 42     42   339 use strict;
  42         158  
  42         903  
5 42     42   219 use warnings;
  42         118  
  42         1044  
6              
7 42     42   18235 use Wikibase::Datatype::Value::Time;
  42         141  
  42         4690  
8              
9             our $VERSION = 0.29;
10              
11             sub new {
12 27     27 1 467 my $class = shift;
13              
14 27         224 my @params = (
15             'datatype' => 'time',
16             'datavalue' => Wikibase::Datatype::Value::Time->new(
17             'value' => '+2013-12-07T00:00:00Z',
18             ),
19             'property' => 'P813',
20             );
21              
22 27         374 my $self = $class->SUPER::new(@params);
23              
24 27         373 return $self;
25             }
26              
27             1;
28              
29             __END__