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.01041';
4              
5             # ABSTRACT: Github v3 Issue Events API
6              
7 17     17   123 use Moo;
  17         32  
  17         106  
8 17     17   5270 use Carp qw( croak );
  17         49  
  17         4857  
9             extends 'Pithub::Base';
10              
11              
12             sub get {
13 3     3 1 7671 my ( $self, %args ) = @_;
14 3 100       24 croak 'Missing key in parameters: event_id' unless $args{event_id};
15 2         24 $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         36 ),
22             %args,
23             );
24             }
25              
26              
27             sub list {
28 3     3 1 3257 my ( $self, %args ) = @_;
29 3         17 $self->_validate_user_repo_args( \%args );
30 3 100       34 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         26 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         9 ),
46             %args,
47             );
48             }
49              
50             1;
51              
52             __END__