File Coverage

blib/lib/Net/Syndic8.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

package Net::Syndic8;

use strict;
use warnings;
require RPC::XML;
require RPC::XML::Client;
use Net::Syndic8::RPCXML;
use Net::Syndic8::FeedsCollection;
use Net::Syndic8::Base;
our @ISA = qw(Net::Syndic8::Base);
our $VERSION = '0.04';
attributes (qw/Gate FeedsColl/);

sub _init { my $self=shift;$self->Init(@_);return 1}

sub Init {
my ($self)=@_;
$self->Gate(new Net::Syndic8::RPCXML:: ('http://www.syndic8.com/xmlrpc.php'));
$self->FeedsColl(
	new Net::Syndic8::FeedsCollection (
				cache=>{},
				gate=>$self->Gate()
				));
}

sub FindSites {
my $self=shift;
return $self->FeedsColl()->FindSites(@_);
}
sub FindFeeds {
my $self=shift;
return $self->FeedsColl()->FindFeeds(@_);
}
# Preloaded methods go here.

1;
__END__