Hub::API;
use autobox::JSON;
say GitHub::API
->new
->user
->repo("moosex-attributeshortcuts")
->hooks
->all
->to_json
;
=head1 DESCRIP
N = '0.000000_03';
}
# ABSTRACT: A list of a repository's hooks
use common::sense;
use autobox::JSON;
use parent 'GitHub::API::Base';
#use aliased 'GitHub::API::Hook';
# debugging...
#use Smart::
N = '0.000000_03';
}
# ABSTRACT: A list of a repository's hooks
use common::sense;
use autobox::JSON;
use parent 'GitHub::API::Base';
# debugging...
#use Smart::Comments '###';
#sub test { ... }
b::API::Base;
{
$GitHub::API::Base::VERSION = '0.000000_03';
}
use common::sense;
use autobox::JSON;
# ABSTRACT: Base class for GitHub::API classes
# debugging...
#use Smart::Comments '###';
sub
>{url},
{ headers => $self->{headers} },
)
->{content}
->from_json
;
return ref $items eq 'ARRAY' ? $items : [ $items ];
}
sub _post {
my ($self,
->{ua}
->post($url, { content => $content->to_json, headers => $self->{headers} })
;
return $resp->{content}->from_json;
}
sub _delete {
my ($self, $content, $path_part) =