File Coverage

blib/lib/WebService/GData/Node/Atom/FeedEntity.pm
Criterion Covered Total %
statement 20 20 100.0
branch n/a
condition n/a
subroutine 5 5 100.0
pod n/a
total 25 25 100.0


line stmt bran cond sub pod time code
1             package WebService::GData::Node::Atom::FeedEntity;
2 7     7   71975 use base 'WebService::GData::Node::Atom::AtomEntity';
  7         13  
  7         4904  
3              
4 7     7   4329 use WebService::GData::Node::Atom::Feed();
  7         21  
  7         126  
5 7     7   5540 use WebService::GData::Node::Atom::Logo();
  7         19  
  7         150  
6 7     7   4048 use WebService::GData::Node::Atom::Generator();
  7         19  
  7         1098  
7             our $VERSION = 0.01_01;
8              
9             sub __init {
10 4     4   11 my ($this,$params) = @_;
11            
12 4         45 $this->SUPER::__init($params);
13            
14 4         86 $this->_entity(new WebService::GData::Node::Atom::Feed('gd:etag'=>$this->{_feed}->{'gd$etag'}));
15 4         46 $this->{_logo}=new WebService::GData::Node::Atom::Logo($this->{_feed}->{logo});
16 4         18 $this->_entity->child($this->{_logo});
17 4         48 $this->{_generator}=new WebService::GData::Node::Atom::Generator($this->{_feed}->{generator});
18 4         16 $this->_entity->child($this->{_generator});
19 4         35 $this->set_children;
20             }
21              
22             "The earth is blue like an orange.";