File Coverage

blib/lib/OpenID/Lite/RelyingParty/Discover/Method/Yadis.pm
Criterion Covered Total %
statement 7 9 77.7
branch n/a
condition n/a
subroutine 3 3 100.0
pod n/a
total 10 12 83.3


line stmt bran cond sub pod time code
1             package OpenID::Lite::RelyingParty::Discover::Method::Yadis;
2 1     1   6 use Any::Moose;
  1         2  
  1         9  
3             extends 'OpenID::Lite::RelyingParty::Discover::Method::Base';
4              
5 1     1   1287 use OpenID::Lite::RelyingParty::Discover::Fetcher::Yadis;
  1         3  
  1         15  
6 1     1   843 use OpenID::Lite::RelyingParty::Discover::Parser::Yadis;
  0            
  0            
7              
8             override '_build__fetcher' => sub {
9             my $self = shift;
10             return OpenID::Lite::RelyingParty::Discover::Fetcher::Yadis->new(
11             agent => $self->agent );
12             };
13              
14             override '_build__parser' => sub {
15             my $self = shift;
16             return OpenID::Lite::RelyingParty::Discover::Parser::Yadis->new;
17             };
18              
19             no Any::Moose;
20             __PACKAGE__->meta->make_immutable;
21             1;
22