File Coverage

blib/lib/Pithub/Repos/Stats.pm
Criterion Covered Total %
statement 10 13 76.9
branch 1 2 50.0
condition 1 2 50.0
subroutine 2 2 100.0
pod 1 1 100.0
total 15 20 75.0


line stmt bran cond sub pod time code
1             package Pithub::Repos::Stats;
2             our $AUTHORITY = 'cpan:PLU';
3             our $VERSION = '0.01040';
4             # ABSTRACT: Github v3 repos / stats API
5              
6 16     16   96 use Moo;
  16         28  
  16         82  
7              
8             extends 'Pithub::Base';
9              
10              
11             sub contributors {
12 2     2 1 5649 my ( $self, %args ) = @_;
13             # The default is to not wait for 200
14 2   50     30 my $sleep = delete $args{wait_for_200} || 0;
15 2         19 $self->_validate_user_repo_args( \%args );
16             my $req = {
17             method => 'GET',
18             path => sprintf(
19             '/repos/%s/%s/stats/contributors',
20             delete $args{user}, delete $args{repo}
21 2         27 ),
22             %args
23             };
24 2         16 my $res = $self->request(
25             %$req
26             );
27              
28 2 50       35 if ($sleep) {
29 0         0 while ($res->response->code == 202) {
30 0         0 sleep $sleep;
31 0         0 $res = $self->request(%$req);
32             }
33             }
34 2         13 return $res;
35             }
36              
37              
38              
39             1;
40              
41             __END__