File Coverage

blib/lib/Test/Shared/Fixture/Wikibase/Datatype/Lexeme/Wikidata/DogCzechNoun.pm
Criterion Covered Total %
statement 25 25 100.0
branch n/a
condition n/a
subroutine 8 8 100.0
pod 1 1 100.0
total 34 34 100.0


line stmt bran cond sub pod time code
1             package Test::Shared::Fixture::Wikibase::Datatype::Lexeme::Wikidata::DogCzechNoun;
2              
3 16     16   1823173 use base qw(Wikibase::Datatype::Lexeme);
  16         209  
  16         7769  
4 16     16   133 use strict;
  16         38  
  16         353  
5 16     16   85 use warnings;
  16         48  
  16         440  
6              
7 16     16   8442 use Test::Shared::Fixture::Wikibase::Datatype::Form::Wikidata::DogCzechSingular;
  16         47  
  16         548  
8 16     16   7355 use Test::Shared::Fixture::Wikibase::Datatype::Sense::Wikidata::Dog;
  16         52  
  16         514  
9 16     16   7373 use Test::Shared::Fixture::Wikibase::Datatype::Statement::Wikidata::GrammaticalGender::Masculine;
  16         43  
  16         499  
10 16     16   121 use Wikibase::Datatype::Value::Monolingual;
  16         39  
  16         2268  
11              
12             our $VERSION = 0.29;
13              
14             sub new {
15 14     14 1 13274 my $class = shift;
16              
17 14         137 my @params = (
18             'forms' => [
19             Test::Shared::Fixture::Wikibase::Datatype::Form::Wikidata::DogCzechSingular->new,
20             ],
21             'id' => 'L469',
22             'language' => 'Q9056',
23             'lastrevid' => 1428556087,
24             'lexical_category' => 'Q1084',
25             'lemmas' => [
26             Wikibase::Datatype::Value::Monolingual->new(
27             'language' => 'cs',
28             'value' => 'pes',
29             ),
30             ],
31             'modified' => '2022-06-24T12:42:10Z',
32             'ns' => 146,
33             'page_id' => 54393954,
34             'senses' => [
35             Test::Shared::Fixture::Wikibase::Datatype::Sense::Wikidata::Dog->new,
36             ],
37             'statements' => [
38             Test::Shared::Fixture::Wikibase::Datatype::Statement::Wikidata::GrammaticalGender::Masculine->new,
39             ],
40             'title' => 'Lexeme:L469',
41             );
42              
43 14         161 my $self = $class->SUPER::new(@params);
44              
45 14         242 return $self;
46             }
47              
48             1;
49              
50             __END__