File Coverage

blib/lib/XML/NewsML_G2/News_Item_Text.pm
Criterion Covered Total %
statement 6 6 100.0
branch n/a
condition n/a
subroutine 2 2 100.0
pod n/a
total 8 8 100.0


line stmt bran cond sub pod time code
1             package XML::NewsML_G2::News_Item_Text;
2              
3 18     18   83093 use Moose;
  18         379019  
  18         152  
4 18     18   118012 use namespace::autoclean;
  18         7830  
  18         166  
5              
6             extends 'XML::NewsML_G2::News_Item';
7              
8             has '+nature', default => 'text';
9              
10             __PACKAGE__->meta->make_immutable;
11              
12             1;
13             __END__
14              
15             =head1 NAME
16              
17             XML::NewsML_G2::News_Item_Text - a text news item (story)
18              
19             =for test_synopsis
20             my ($provider, $service, $genre1, $genre2);
21              
22             =head1 SYNOPSIS
23              
24             my $ni = XML::NewsML_G2::News_Item_Text->new
25             (guid => "tag:example.com,2013:service:date:number",
26             title => "Story title",
27             slugline => "the/slugline",
28             language => 'de',
29             provider => $provider,
30             service => $service,
31             );
32              
33             $ni->add_genre($genre1, $genre2);
34             $ni->add_source('APA');
35             $ni->add_paragraph('blah blah blah');
36              
37             =head1 ATTRIBUTES
38              
39             For a list of attributes, please see L<XML::NewsML_G2::News_Item>.
40              
41             =head1 AUTHOR
42              
43             Philipp Gortan C<< <philipp.gortan@apa.at> >>
44              
45             =head1 LICENCE AND COPYRIGHT
46              
47             Copyright (c) 2013, APA-IT. All rights reserved.
48              
49             See L<XML::NewsML_G2> for the license.