File Coverage

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

Criterion	Covered	Total	%
statement	15	29	51.7
branch			n/a
condition			n/a
subroutine	5	17	29.4
pod	12	12	100.0
total	32	58	55.1

package WWW::Kickstarter::Data::Location;

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 slug       { $_[0]{slug} }
sub type       { $_[0]{type} }
sub country    { $_[0]{country} }
sub state      { $_[0]{state} }
sub name       { $_[0]{name} }
sub full_name  { $_[0]{displayable_name} }
sub short_name { $_[0]{short_name} }
sub longitude  { $_[0]{longitude} }
sub latitude   { $_[0]{latitude} }


sub refetch         { my $self = shift;  return $self->ks->location($self->id, @_); }
sub nearby_projects { my $self = shift;  return $self->ks->projects_near_location($self->id, @_); }


1;


__END__