File Coverage

blib/lib/Pithub/Repos/Contents.pm

Criterion	Covered	Total	%
statement	19	19	100.0
branch	6	6	100.0
condition	2	2	100.0
subroutine	5	5	100.0
pod	3	3	100.0
total	35	35	100.0

package Pithub::Repos::Contents;
our $AUTHORITY = 'cpan:PLU';
our $VERSION = '0.01041';

# ABSTRACT: Github v3 Repo Contents API

use Moo;
use Carp qw( croak );
extends 'Pithub::Base';


sub archive {
    my ( $self, %args ) = @_;
    croak 'Missing key in parameters: archive_format'
        unless $args{archive_format};
    croak 'Invalid archive_format. Valid formats: tarball, zipball'
        unless grep $args{archive_format} eq $_, qw(tarball zipball);
    $self->_validate_user_repo_args( \%args );
    return $self->request(
        method => 'GET',
        path   => sprintf(
            '/repos/%s/%s/%s/%s', delete $args{user}, delete $args{repo},
            delete $args{archive_format}, delete $args{ref} || q{}
        ),
        %args,
    );
}


sub get {
    my ( $self, %args ) = @_;
    $self->_validate_user_repo_args( \%args );
    if ( my $path = delete $args{path} ) {
        return $self->request(
            method => 'GET',
            path   => sprintf(
                '/repos/%s/%s/contents/%s', delete $args{user},
                delete $args{repo},         $path
            ),
            %args,
        );
    }
    return $self->request(
        method => 'GET',
        path   => sprintf(
            '/repos/%s/%s/contents', delete $args{user}, delete $args{repo}
        ),
        %args,
    );
}


sub readme {
    my ( $self, %args ) = @_;
    $self->_validate_user_repo_args( \%args );
    return $self->request(
        method => 'GET',
        path   => sprintf(
            '/repos/%s/%s/readme', delete $args{user}, delete $args{repo}
        ),
        %args,
    );
}

1;

__END__