File Coverage

blib/lib/WebService/GData/Node/Atom/AuthorEntity.pm

Criterion	Covered	Total	%
statement	17	17	100.0
branch	4	4	100.0
condition			n/a
subroutine	5	5	100.0
pod			n/a
total	26	26	100.0

package WebService::GData::Node::Atom::AuthorEntity;
use base 'WebService::GData::Node::AbstractEntity';
use WebService::GData::Node::Atom::Author();
use WebService::GData::Node::Atom::Uri();
use WebService::GData::Node::Atom::Name();

our $VERSION = 0.01_02;

sub __init {
	my ($this,$params) = @_;

	$this->_entity(new WebService::GData::Node::Atom::Author());
	$this->{_name}   = new WebService::GData::Node::Atom::Name(
	   text=>ref $params->{name}? $params->{name}->{'$t'}: $params->{name} );
	$this->{_uri}    = new WebService::GData::Node::Atom::Uri (
	   text=>ref $params->{uri} ? $params->{uri}->{'$t'} : $params->{uri}  );

	$this->_entity->child($this->{_name})->child($this->{_uri});

}



1;