File Coverage

blib/lib/Pithub/Issues/Events.pm
Criterion Covered Total %
statement 15 15 100.0
branch 4 4 100.0
condition n/a
subroutine 4 4 100.0
pod 2 2 100.0
total 25 25 100.0


line stmt bran cond sub pod time code
1             package Pithub::Issues::Events;
2             our $AUTHORITY = 'cpan:PLU';
3             our $VERSION = '0.01043';
4              
5             # ABSTRACT: Github v3 Issue Events API
6              
7 17     17   112 use Moo;
  17         37  
  17         102  
8 17     17   6761 use Carp qw( croak );
  17         34  
  17         5394  
9             extends 'Pithub::Base';
10              
11              
12             sub get {
13 3     3 1 12749 my ( $self, %args ) = @_;
14 3 100       28 croak 'Missing key in parameters: event_id' unless $args{event_id};
15 2         25 $self->_validate_user_repo_args( \%args );
16             return $self->request(
17             method => 'GET',
18             path => sprintf(
19             '/repos/%s/%s/issues/events/%s', delete $args{user},
20             delete $args{repo}, delete $args{event_id}
21 2         29 ),
22             %args,
23             );
24             }
25              
26              
27             sub list {
28 3     3 1 4552 my ( $self, %args ) = @_;
29 3         20 $self->_validate_user_repo_args( \%args );
30 3 100       15 if ( my $issue_id = delete $args{issue_id} ) {
31             return $self->request(
32             method => 'GET',
33             path => sprintf(
34             '/repos/%s/%s/issues/%s/events', delete $args{user},
35 2         28 delete $args{repo}, $issue_id
36             ),
37             %args,
38             );
39             }
40             return $self->request(
41             method => 'GET',
42             path => sprintf(
43             '/repos/%s/%s/issues/events', delete $args{user},
44             delete $args{repo}
45 1         8 ),
46             %args,
47             );
48             }
49              
50             1;
51              
52             __END__