File Coverage

blib/lib/Net/Async/Github/RateLimit.pm

Criterion	Covered	Total	%
statement	9	14	64.2
branch			n/a
condition			n/a
subroutine	3	5	60.0
pod	2	2	100.0
total	14	21	66.6

package Net::Async::Github::RateLimit;

use strict;
use warnings;

use Net::Async::Github::RateLimit::Core;

our $VERSION = '0.013'; # VERSION

=head1 NAME

Net::Async::Github::RateLimit - represents the current user's rate limit

=head1 METHODS

=head2 new

Instantiates.

=cut

sub new {
    my ($class, %args) = @_;
    $args{core} = Net::Async::Github::RateLimit::Core->new(%{ delete $args{resources}{core} });
    bless \%args, $class
}

=head2 core

Returns a L instance.

=cut

sub core { shift->{core} }

1;