File Coverage

blib/lib/WWW/Kickstarter/Data/Reward.pm

Criterion	Covered	Total	%
statement	15	23	65.2
branch			n/a
condition			n/a
subroutine	5	12	41.6
pod	7	7	100.0
total	27	42	64.2

package WWW::Kickstarter::Data::Reward;

use strict;
use warnings;
no autovivification;


use WWW::Kickstarter::Data  qw( );
use WWW::Kickstarter::Error qw( my_croak );


our @ISA = 'WWW::Kickstarter::Data';


sub id            { $_[0]{id} }
sub project_id    { $_[0]{project_id} }
sub text          { $_[0]{reward} }
sub min_pledge    { $_[0]{minimum} }
sub max_backers   { $_[0]{limit} }
sub backers_count { $_[0]{backers_count} }


#sub refetch { my $self = shift;  return $self->ks->reward($self->id, @_); }
sub project { my $self = shift;  return $self->ks->project($self->project_id, @_); }


1;


__END__