File Coverage

blib/lib/Pithub/Repos/Statuses.pm

Criterion	Covered	Total	%
statement	16	17	94.1
branch	2	4	50.0
condition			n/a
subroutine	4	4	100.0
pod	2	2	100.0
total	24	27	88.8

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

# ABSTRACT:  Github v3 repos / statuses API

use Moo;
use Carp qw( croak );

extends 'Pithub::Base';


sub list {
    my ( $self, %args ) = @_;

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


sub create {
    my ( $self, %args ) = @_;
    $self->_validate_user_repo_args( \%args );
    croak
        'Missing state paramenter. Must be one of pending, success, error or failure'
        unless $args{data}->{state};

    unless ( $args{data}->{state} =~ m/^(?:pending|success|error|failure)$/ )
    {
        croak
            'state param must be one of pending, success, error, failure. Was '
            . $args{data}->{state};
    }

    my $req = {
        method => 'POST',
        path   => sprintf(
            '/repos/%s/%s/statuses/%s',
            delete $args{user}, delete $args{repo}, delete $args{sha},
        ),
        %args
    };

    return $self->request(%$req);
}

1;

__END__