File Coverage

blib/lib/Pithub/GitData/Blobs.pm
Criterion Covered Total %
statement 14 14 100.0
branch 4 4 100.0
condition n/a
subroutine 4 4 100.0
pod 2 2 100.0
total 24 24 100.0


line stmt bran cond sub pod time code
1             package Pithub::GitData::Blobs;
2             our $AUTHORITY = 'cpan:PLU';
3             our $VERSION = '0.01041';
4              
5             # ABSTRACT: Github v3 Git Data Blobs API
6              
7 16     16   200690 use Moo;
  16         50  
  16         96  
8 16     16   5036 use Carp qw( croak );
  16         39  
  16         4557  
9             extends 'Pithub::Base';
10              
11              
12             sub create {
13 5     5 1 10274 my ( $self, %args ) = @_;
14             croak 'Missing key in parameters: data (hashref)'
15 5 100       44 unless ref $args{data} eq 'HASH';
16 3         27 $self->_validate_user_repo_args( \%args );
17             return $self->request(
18             method => 'POST',
19             path => sprintf(
20             '/repos/%s/%s/git/blobs', delete $args{user}, delete $args{repo}
21 3         37 ),
22             %args,
23             );
24             }
25              
26              
27             sub get {
28 3     3 1 2431 my ( $self, %args ) = @_;
29 3 100       22 croak 'Missing key in parameters: sha' unless $args{sha};
30 2         12 $self->_validate_user_repo_args( \%args );
31             return $self->request(
32             method => 'GET',
33             path => sprintf(
34             '/repos/%s/%s/git/blobs/%s', delete $args{user},
35             delete $args{repo}, delete $args{sha}
36 2         24 ),
37             %args,
38             );
39             }
40              
41             1;
42              
43             __END__