our
$VERSION
=
'0.27'
;
Hide Show 89 lines of Pod
sub
BUILD {
my
(
$self
) =
@_
;
$self
->access_token();
$self
->private_token();
$log
->debugf(
"An instance of %s has been created."
,
ref
(
$self
) );
return
;
}
sub
_call_rest_client {
my
(
$self
,
$verb
,
$path
,
$path_vars
,
$options
) =
@_
;
$options
->{headers} =
$self
->_auth_headers();
return
$self
->rest_client->request(
$verb
,
$path
,
$path_vars
,
$options
,
);
}
sub
_auth_headers {
my
(
$self
) =
@_
;
my
$headers
= {};
$headers
->{
'authorization'
} =
'Bearer '
.
$self
->access_token()
if
defined
$self
->access_token();
$headers
->{
'private-token'
} =
$self
->private_token()
if
defined
$self
->private_token();
$headers
->{
'sudo'
} =
$self
->sudo_user()
if
defined
$self
->sudo_user();
return
$headers
;
}
sub
_clone_args {
my
(
$self
) =
@_
;
return
{
url
=>
$self
->url(),
retries
=>
$self
->retries(),
rest_client
=>
$self
->rest_client(),
(
defined
$self
->access_token()) ? (
access_token
=>
$self
->access_token()) : (),
(
defined
$self
->private_token()) ? (
private_token
=>
$self
->private_token()) : (),
};
}
sub
_clone {
my
$self
=
shift
;
my
$class
=
ref
$self
;
my
$args
= {
%{
$self
->_clone_args() },
%{
$class
->BUILDARGS(
@_
) },
};
return
$class
->new(
$args
);
}
sub
_make_safe_closure {
my
(
$ret
) =
@_
;
return
sub
{
$ret
};
}
Hide Show 9 lines of Pod
has
url
=> (
is
=>
'ro'
,
isa
=> NonEmptySimpleStr,
required
=> 1,
);
Hide Show 10 lines of Pod
has
_access_token_arg
=> (
is
=>
'ro'
,
isa
=> NonEmptySimpleStr,
init_arg
=>
'access_token'
,
clearer
=>
'_clear_access_token_arg'
,
);
has
_access_token_closure
=> (
is
=>
'lazy'
,
isa
=> CodeRef,
init_arg
=>
undef
,
builder
=>
'_build_access_token_closure'
,
);
sub
_build_access_token_closure {
my
(
$self
) =
@_
;
my
$token
=
$self
->_access_token_arg();
$self
->_clear_access_token_arg();
return
_make_safe_closure(
$token
);
}
sub
access_token {
my
(
$self
) =
@_
;
return
$self
->_access_token_closure->();
}
Hide Show 8 lines of Pod
has
_private_token_arg
=> (
is
=>
'ro'
,
isa
=> NonEmptySimpleStr,
init_arg
=>
'private_token'
,
clearer
=>
'_clear_private_token_arg'
,
);
has
_private_token_closure
=> (
is
=>
'lazy'
,
isa
=> CodeRef,
init_arg
=>
undef
,
builder
=>
'_build_private_token_closure'
,
);
sub
_build_private_token_closure {
my
(
$self
) =
@_
;
my
$token
=
$self
->_private_token_arg();
$self
->_clear_private_token_arg();
return
_make_safe_closure(
$token
);
}
sub
private_token {
my
(
$self
) =
@_
;
return
$self
->_private_token_closure->();
}
Hide Show 8 lines of Pod
has
retries
=> (
is
=>
'ro'
,
isa
=> PositiveOrZeroInt,
default
=> 0,
);
Hide Show 9 lines of Pod
has
sudo_user
=> (
is
=>
'ro'
,
isa
=> NonEmptySimpleStr,
);
Hide Show 8 lines of Pod
has
rest_client
=> (
is
=>
'lazy'
,
isa
=> InstanceOf[
'GitLab::API::v4::RESTClient'
],
);
sub
_build_rest_client {
my
(
$self
) =
@_
;
return
$self
->rest_client_class->new(
base_url
=>
$self
->url(),
retries
=>
$self
->retries(),
);
}
Hide Show 7 lines of Pod
has
rest_client_class
=> (
is
=>
'lazy'
,
isa
=> NonEmptySimpleStr,
);
sub
_build_rest_client_class {
return
'GitLab::API::v4::RESTClient'
;
}
Hide Show 29 lines of Pod
sub
paginator {
my
(
$self
,
$method
,
@args
) =
@_
;
my
$params
= (
ref
(
$args
[-1]) eq
'HASH'
) ?
pop
(
@args
) : {};
return
GitLab::API::v4::Paginator->new(
api
=>
$self
,
method
=>
$method
,
args
=> \
@args
,
params
=>
$params
,
);
}
Hide Show 11 lines of Pod
sub
sudo {
my
(
$self
,
$user
) =
@_
;
return
$self
->_clone(
sudo_user
=>
$user
,
);
}
Hide Show 20 lines of Pod
sub
issue_award_emojis {
my
$self
=
shift
;
croak
'issue_award_emojis must be called with 2 to 3 arguments'
if
@_
< 2 or
@_
> 3;
croak
'The #1 argument ($project_id) to issue_award_emojis must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($issue_iid) to issue_award_emojis must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The last argument (\%params) to issue_award_emojis must be a hash ref'
if
defined
(
$_
[2]) and
ref
(
$_
[2]) ne
'HASH'
;
my
$params
= (
@_
== 3) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/issues/:issue_iid/award_emoji'
, [
@_
],
$options
);
}
Hide Show 12 lines of Pod
sub
merge_request_award_emojis {
my
$self
=
shift
;
croak
'merge_request_award_emojis must be called with 2 to 3 arguments'
if
@_
< 2 or
@_
> 3;
croak
'The #1 argument ($project_id) to merge_request_award_emojis must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($merge_request_iid) to merge_request_award_emojis must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The last argument (\%params) to merge_request_award_emojis must be a hash ref'
if
defined
(
$_
[2]) and
ref
(
$_
[2]) ne
'HASH'
;
my
$params
= (
@_
== 3) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/merge_requests/:merge_request_iid/award_emoji'
, [
@_
],
$options
);
}
Hide Show 12 lines of Pod
sub
snippet_award_emojis {
my
$self
=
shift
;
croak
'snippet_award_emojis must be called with 2 to 3 arguments'
if
@_
< 2 or
@_
> 3;
croak
'The #1 argument ($project_id) to snippet_award_emojis must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($merge_request_id) to snippet_award_emojis must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The last argument (\%params) to snippet_award_emojis must be a hash ref'
if
defined
(
$_
[2]) and
ref
(
$_
[2]) ne
'HASH'
;
my
$params
= (
@_
== 3) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/merge_requests/:merge_request_id/award_emoji'
, [
@_
],
$options
);
}
Hide Show 12 lines of Pod
sub
issue_award_emoji {
my
$self
=
shift
;
croak
'issue_award_emoji must be called with 3 arguments'
if
@_
!= 3;
croak
'The #1 argument ($project_id) to issue_award_emoji must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($issue_iid) to issue_award_emoji must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The #3 argument ($award_id) to issue_award_emoji must be a scalar'
if
ref
(
$_
[2]) or (!
defined
$_
[2]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/issues/:issue_iid/award_emoji/:award_id'
, [
@_
],
$options
);
}
Hide Show 12 lines of Pod
sub
merge_request_award_emoji {
my
$self
=
shift
;
croak
'merge_request_award_emoji must be called with 3 arguments'
if
@_
!= 3;
croak
'The #1 argument ($project_id) to merge_request_award_emoji must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($merge_request_iid) to merge_request_award_emoji must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The #3 argument ($award_id) to merge_request_award_emoji must be a scalar'
if
ref
(
$_
[2]) or (!
defined
$_
[2]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/merge_requests/:merge_request_iid/award_emoji/:award_id'
, [
@_
],
$options
);
}
Hide Show 12 lines of Pod
sub
snippet_award_emoji {
my
$self
=
shift
;
croak
'snippet_award_emoji must be called with 3 arguments'
if
@_
!= 3;
croak
'The #1 argument ($project_id) to snippet_award_emoji must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($snippet_id) to snippet_award_emoji must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The #3 argument ($award_id) to snippet_award_emoji must be a scalar'
if
ref
(
$_
[2]) or (!
defined
$_
[2]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/snippets/:snippet_id/award_emoji/:award_id'
, [
@_
],
$options
);
}
Hide Show 12 lines of Pod
sub
create_issue_award_emoji {
my
$self
=
shift
;
croak
'create_issue_award_emoji must be called with 2 to 3 arguments'
if
@_
< 2 or
@_
> 3;
croak
'The #1 argument ($project_id) to create_issue_award_emoji must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($issue_iid) to create_issue_award_emoji must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The last argument (\%params) to create_issue_award_emoji must be a hash ref'
if
defined
(
$_
[2]) and
ref
(
$_
[2]) ne
'HASH'
;
my
$params
= (
@_
== 3) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'POST'
,
'projects/:project_id/issues/:issue_iid/award_emoji'
, [
@_
],
$options
);
}
Hide Show 12 lines of Pod
sub
create_merge_request_award_emoji {
my
$self
=
shift
;
croak
'create_merge_request_award_emoji must be called with 2 to 3 arguments'
if
@_
< 2 or
@_
> 3;
croak
'The #1 argument ($project_id) to create_merge_request_award_emoji must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($merge_request_iid) to create_merge_request_award_emoji must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The last argument (\%params) to create_merge_request_award_emoji must be a hash ref'
if
defined
(
$_
[2]) and
ref
(
$_
[2]) ne
'HASH'
;
my
$params
= (
@_
== 3) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'POST'
,
'projects/:project_id/merge_requests/:merge_request_iid/award_emoji'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
create_snippet_award_emoji {
my
$self
=
shift
;
croak
'create_snippet_award_emoji must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to create_snippet_award_emoji must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($snippet_id) to create_snippet_award_emoji must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
return
$self
->_call_rest_client(
'POST'
,
'projects/:project_id/snippets/:snippet_id/award_emoji'
, [
@_
],
$options
);
}
Hide Show 12 lines of Pod
sub
delete_issue_award_emoji {
my
$self
=
shift
;
croak
'delete_issue_award_emoji must be called with 3 arguments'
if
@_
!= 3;
croak
'The #1 argument ($project_id) to delete_issue_award_emoji must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($issue_id) to delete_issue_award_emoji must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The #3 argument ($award_id) to delete_issue_award_emoji must be a scalar'
if
ref
(
$_
[2]) or (!
defined
$_
[2]);
my
$options
= {};
return
$self
->_call_rest_client(
'DELETE'
,
'projects/:project_id/issues/:issue_id/award_emoji/:award_id'
, [
@_
],
$options
);
}
Hide Show 12 lines of Pod
sub
delete_merge_request_award_emoji {
my
$self
=
shift
;
croak
'delete_merge_request_award_emoji must be called with 3 arguments'
if
@_
!= 3;
croak
'The #1 argument ($project_id) to delete_merge_request_award_emoji must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($merge_request_id) to delete_merge_request_award_emoji must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The #3 argument ($award_id) to delete_merge_request_award_emoji must be a scalar'
if
ref
(
$_
[2]) or (!
defined
$_
[2]);
my
$options
= {};
return
$self
->_call_rest_client(
'DELETE'
,
'projects/:project_id/merge_requests/:merge_request_id/award_emoji/:award_id'
, [
@_
],
$options
);
}
Hide Show 12 lines of Pod
sub
delete_snippet_award_emoji {
my
$self
=
shift
;
croak
'delete_snippet_award_emoji must be called with 3 arguments'
if
@_
!= 3;
croak
'The #1 argument ($project_id) to delete_snippet_award_emoji must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($snippet_id) to delete_snippet_award_emoji must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The #3 argument ($award_id) to delete_snippet_award_emoji must be a scalar'
if
ref
(
$_
[2]) or (!
defined
$_
[2]);
my
$options
= {};
return
$self
->_call_rest_client(
'DELETE'
,
'projects/:project_id/snippets/:snippet_id/award_emoji/:award_id'
, [
@_
],
$options
);
}
Hide Show 12 lines of Pod
sub
issue_note_award_emojis {
my
$self
=
shift
;
croak
'issue_note_award_emojis must be called with 3 arguments'
if
@_
!= 3;
croak
'The #1 argument ($project_id) to issue_note_award_emojis must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($issue_iid) to issue_note_award_emojis must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The #3 argument ($note_id) to issue_note_award_emojis must be a scalar'
if
ref
(
$_
[2]) or (!
defined
$_
[2]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/issues/:issue_iid/notes/:note_id/award_emoji'
, [
@_
],
$options
);
}
Hide Show 13 lines of Pod
sub
issue_note_award_emoji {
my
$self
=
shift
;
croak
'issue_note_award_emoji must be called with 4 arguments'
if
@_
!= 4;
croak
'The #1 argument ($project_id) to issue_note_award_emoji must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($issue_iid) to issue_note_award_emoji must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The #3 argument ($note_id) to issue_note_award_emoji must be a scalar'
if
ref
(
$_
[2]) or (!
defined
$_
[2]);
croak
'The #4 argument ($award_id) to issue_note_award_emoji must be a scalar'
if
ref
(
$_
[3]) or (!
defined
$_
[3]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/issues/:issue_iid/notes/:note_id/award_emoji/:award_id'
, [
@_
],
$options
);
}
Hide Show 13 lines of Pod
sub
create_issue_note_award_emoji {
my
$self
=
shift
;
croak
'create_issue_note_award_emoji must be called with 3 to 4 arguments'
if
@_
< 3 or
@_
> 4;
croak
'The #1 argument ($project_id) to create_issue_note_award_emoji must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($issue_iid) to create_issue_note_award_emoji must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The #3 argument ($note_id) to create_issue_note_award_emoji must be a scalar'
if
ref
(
$_
[2]) or (!
defined
$_
[2]);
croak
'The last argument (\%params) to create_issue_note_award_emoji must be a hash ref'
if
defined
(
$_
[3]) and
ref
(
$_
[3]) ne
'HASH'
;
my
$params
= (
@_
== 4) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'POST'
,
'projects/:project_id/issues/:issue_iid/notes/:note_id/award_emoji'
, [
@_
],
$options
);
}
Hide Show 13 lines of Pod
sub
delete_issue_note_award_emoji {
my
$self
=
shift
;
croak
'delete_issue_note_award_emoji must be called with 4 arguments'
if
@_
!= 4;
croak
'The #1 argument ($project_id) to delete_issue_note_award_emoji must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($issue_iid) to delete_issue_note_award_emoji must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The #3 argument ($note_id) to delete_issue_note_award_emoji must be a scalar'
if
ref
(
$_
[2]) or (!
defined
$_
[2]);
croak
'The #4 argument ($award_id) to delete_issue_note_award_emoji must be a scalar'
if
ref
(
$_
[3]) or (!
defined
$_
[3]);
my
$options
= {};
return
$self
->_call_rest_client(
'DELETE'
,
'projects/:project_id/issues/:issue_iid/notes/:note_id/award_emoji/:award_id'
, [
@_
],
$options
);
}
Hide Show 12 lines of Pod
sub
merge_request_note_award_emojis {
my
$self
=
shift
;
croak
'merge_request_note_award_emojis must be called with 3 arguments'
if
@_
!= 3;
croak
'The #1 argument ($project_id) to merge_request_note_award_emojis must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($merge_request_iid) to merge_request_note_award_emojis must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The #3 argument ($note_id) to merge_request_note_award_emojis must be a scalar'
if
ref
(
$_
[2]) or (!
defined
$_
[2]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/merge_requests/:merge_request_iid/notes/:note_id/award_emoji'
, [
@_
],
$options
);
}
Hide Show 13 lines of Pod
sub
merge_request_note_award_emoji {
my
$self
=
shift
;
croak
'merge_request_note_award_emoji must be called with 4 arguments'
if
@_
!= 4;
croak
'The #1 argument ($project_id) to merge_request_note_award_emoji must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($merge_request_iid) to merge_request_note_award_emoji must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The #3 argument ($note_id) to merge_request_note_award_emoji must be a scalar'
if
ref
(
$_
[2]) or (!
defined
$_
[2]);
croak
'The #4 argument ($award_id) to merge_request_note_award_emoji must be a scalar'
if
ref
(
$_
[3]) or (!
defined
$_
[3]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/merge_requests/:merge_request_iid/notes/:note_id/award_emoji/:award_id'
, [
@_
],
$options
);
}
Hide Show 13 lines of Pod
sub
create_merge_request_note_award_emoji {
my
$self
=
shift
;
croak
'create_merge_request_note_award_emoji must be called with 3 to 4 arguments'
if
@_
< 3 or
@_
> 4;
croak
'The #1 argument ($project_id) to create_merge_request_note_award_emoji must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($merge_request_iid) to create_merge_request_note_award_emoji must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The #3 argument ($note_id) to create_merge_request_note_award_emoji must be a scalar'
if
ref
(
$_
[2]) or (!
defined
$_
[2]);
croak
'The last argument (\%params) to create_merge_request_note_award_emoji must be a hash ref'
if
defined
(
$_
[3]) and
ref
(
$_
[3]) ne
'HASH'
;
my
$params
= (
@_
== 4) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'POST'
,
'projects/:project_id/merge_requests/:merge_request_iid/notes/:note_id/award_emoji'
, [
@_
],
$options
);
}
Hide Show 13 lines of Pod
sub
delete_merge_request_note_award_emoji {
my
$self
=
shift
;
croak
'delete_merge_request_note_award_emoji must be called with 4 arguments'
if
@_
!= 4;
croak
'The #1 argument ($project_id) to delete_merge_request_note_award_emoji must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($merge_request_iid) to delete_merge_request_note_award_emoji must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The #3 argument ($note_id) to delete_merge_request_note_award_emoji must be a scalar'
if
ref
(
$_
[2]) or (!
defined
$_
[2]);
croak
'The #4 argument ($award_id) to delete_merge_request_note_award_emoji must be a scalar'
if
ref
(
$_
[3]) or (!
defined
$_
[3]);
my
$options
= {};
return
$self
->_call_rest_client(
'DELETE'
,
'projects/:project_id/merge_requests/:merge_request_iid/notes/:note_id/award_emoji/:award_id'
, [
@_
],
$options
);
}
Hide Show 19 lines of Pod
sub
branches {
my
$self
=
shift
;
croak
'branches must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($project_id) to branches must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to branches must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/repository/branches'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
branch {
my
$self
=
shift
;
croak
'branch must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to branch must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($branch_name) to branch must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/repository/branches/:branch_name'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
create_branch {
my
$self
=
shift
;
croak
'create_branch must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($project_id) to create_branch must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to create_branch must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'POST'
,
'projects/:project_id/repository/branches'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
delete_branch {
my
$self
=
shift
;
croak
'delete_branch must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to delete_branch must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($branch_name) to delete_branch must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
$options
->{decode} = 0;
$self
->_call_rest_client(
'DELETE'
,
'projects/:project_id/repository/branches/:branch_name'
, [
@_
],
$options
);
return
;
}
Hide Show 10 lines of Pod
sub
delete_merged_branches {
my
$self
=
shift
;
croak
'delete_merged_branches must be called with 1 arguments'
if
@_
!= 1;
croak
'The #1 argument ($project_id) to delete_merged_branches must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
my
$options
= {};
$options
->{decode} = 0;
$self
->_call_rest_client(
'DELETE'
,
'projects/:project_id/repository/merged_branches'
, [
@_
],
$options
);
return
;
}
Hide Show 18 lines of Pod
sub
broadcast_messages {
my
$self
=
shift
;
croak
'broadcast_messages must be called with 0 to 1 arguments'
if
@_
< 0 or
@_
> 1;
croak
'The last argument (\%params) to broadcast_messages must be a hash ref'
if
defined
(
$_
[0]) and
ref
(
$_
[0]) ne
'HASH'
;
my
$params
= (
@_
== 1) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'broadcast_messages'
, [
@_
],
$options
);
}
Hide Show 10 lines of Pod
sub
broadcast_message {
my
$self
=
shift
;
croak
'broadcast_message must be called with 1 arguments'
if
@_
!= 1;
croak
'The #1 argument ($message_id) to broadcast_message must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'broadcast_messages/:message_id'
, [
@_
],
$options
);
}
Hide Show 10 lines of Pod
sub
create_broadcast_message {
my
$self
=
shift
;
croak
'create_broadcast_message must be called with 0 to 1 arguments'
if
@_
< 0 or
@_
> 1;
croak
'The last argument (\%params) to create_broadcast_message must be a hash ref'
if
defined
(
$_
[0]) and
ref
(
$_
[0]) ne
'HASH'
;
my
$params
= (
@_
== 1) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'POST'
,
'broadcast_messages'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
edit_broadcast_message {
my
$self
=
shift
;
croak
'edit_broadcast_message must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($message_id) to edit_broadcast_message must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to edit_broadcast_message must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'PUT'
,
'broadcast_messages/:message_id'
, [
@_
],
$options
);
}
Hide Show 10 lines of Pod
sub
delete_broadcast_message {
my
$self
=
shift
;
croak
'delete_broadcast_message must be called with 1 arguments'
if
@_
!= 1;
croak
'The #1 argument ($message_id) to delete_broadcast_message must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
my
$options
= {};
$options
->{decode} = 0;
$self
->_call_rest_client(
'DELETE'
,
'broadcast_messages/:message_id'
, [
@_
],
$options
);
return
;
}
Hide Show 19 lines of Pod
sub
project_variables {
my
$self
=
shift
;
croak
'project_variables must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($project_id) to project_variables must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to project_variables must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/variables'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
project_variable {
my
$self
=
shift
;
croak
'project_variable must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to project_variable must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($variable_key) to project_variable must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/variables/:variable_key'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
create_project_variable {
my
$self
=
shift
;
croak
'create_project_variable must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($project_id) to create_project_variable must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to create_project_variable must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'POST'
,
'projects/:project_id/variables'
, [
@_
],
$options
);
}
Hide Show 12 lines of Pod
sub
edit_project_variable {
my
$self
=
shift
;
croak
'edit_project_variable must be called with 2 to 3 arguments'
if
@_
< 2 or
@_
> 3;
croak
'The #1 argument ($project_id) to edit_project_variable must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($variable_key) to edit_project_variable must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The last argument (\%params) to edit_project_variable must be a hash ref'
if
defined
(
$_
[2]) and
ref
(
$_
[2]) ne
'HASH'
;
my
$params
= (
@_
== 3) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'PUT'
,
'projects/:project_id/variables/:variable_key'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
delete_project_variable {
my
$self
=
shift
;
croak
'delete_project_variable must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to delete_project_variable must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($variable_key) to delete_project_variable must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
$options
->{decode} = 0;
$self
->_call_rest_client(
'DELETE'
,
'projects/:project_id/variables/:variable_key'
, [
@_
],
$options
);
return
;
}
Hide Show 19 lines of Pod
sub
group_variables {
my
$self
=
shift
;
croak
'group_variables must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($group_id) to group_variables must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to group_variables must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'groups/:group_id/variables'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
group_variable {
my
$self
=
shift
;
croak
'group_variable must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($group_id) to group_variable must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($variable_key) to group_variable must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'groups/:group_id/variables/:variable_key'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
create_group_variable {
my
$self
=
shift
;
croak
'create_group_variable must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($group_id) to create_group_variable must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to create_group_variable must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'POST'
,
'groups/:group_id/variables'
, [
@_
],
$options
);
}
Hide Show 12 lines of Pod
sub
edit_group_variable {
my
$self
=
shift
;
croak
'edit_group_variable must be called with 2 to 3 arguments'
if
@_
< 2 or
@_
> 3;
croak
'The #1 argument ($group_id) to edit_group_variable must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($variable_key) to edit_group_variable must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The last argument (\%params) to edit_group_variable must be a hash ref'
if
defined
(
$_
[2]) and
ref
(
$_
[2]) ne
'HASH'
;
my
$params
= (
@_
== 3) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'PUT'
,
'groups/:group_id/variables/:variable_key'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
delete_group_variable {
my
$self
=
shift
;
croak
'delete_group_variable must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($group_id) to delete_group_variable must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($variable_key) to delete_group_variable must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
$options
->{decode} = 0;
$self
->_call_rest_client(
'DELETE'
,
'groups/:group_id/variables/:variable_key'
, [
@_
],
$options
);
return
;
}
Hide Show 16 lines of Pod
sub
snippets {
my
$self
=
shift
;
croak
"The snippets method does not take any arguments"
if
@_
;
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'snippets'
, [
@_
],
$options
);
}
Hide Show 10 lines of Pod
sub
snippet {
my
$self
=
shift
;
croak
'snippet must be called with 1 arguments'
if
@_
!= 1;
croak
'The #1 argument ($snippet_id) to snippet must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'snippets/:snippet_id'
, [
@_
],
$options
);
}
Hide Show 10 lines of Pod
sub
create_snippet {
my
$self
=
shift
;
croak
'create_snippet must be called with 0 to 1 arguments'
if
@_
< 0 or
@_
> 1;
croak
'The last argument (\%params) to create_snippet must be a hash ref'
if
defined
(
$_
[0]) and
ref
(
$_
[0]) ne
'HASH'
;
my
$params
= (
@_
== 1) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'POST'
,
'snippets'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
edit_snippet {
my
$self
=
shift
;
croak
'edit_snippet must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($snippet_id) to edit_snippet must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to edit_snippet must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'PUT'
,
'snippets/:snippet_id'
, [
@_
],
$options
);
}
Hide Show 10 lines of Pod
sub
delete_snippet {
my
$self
=
shift
;
croak
'delete_snippet must be called with 1 arguments'
if
@_
!= 1;
croak
'The #1 argument ($snippet_id) to delete_snippet must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
my
$options
= {};
$options
->{decode} = 0;
$self
->_call_rest_client(
'DELETE'
,
'snippets/:snippet_id'
, [
@_
],
$options
);
return
;
}
Hide Show 10 lines of Pod
sub
public_snippets {
my
$self
=
shift
;
croak
'public_snippets must be called with 0 to 1 arguments'
if
@_
< 0 or
@_
> 1;
croak
'The last argument (\%params) to public_snippets must be a hash ref'
if
defined
(
$_
[0]) and
ref
(
$_
[0]) ne
'HASH'
;
my
$params
= (
@_
== 1) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'snippets/public'
, [
@_
],
$options
);
}
Hide Show 10 lines of Pod
sub
snippet_user_agent_detail {
my
$self
=
shift
;
croak
'snippet_user_agent_detail must be called with 1 arguments'
if
@_
!= 1;
croak
'The #1 argument ($snippet_id) to snippet_user_agent_detail must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'snippets/:snippet_id/user_agent_detail'
, [
@_
],
$options
);
}
Hide Show 19 lines of Pod
sub
commits {
my
$self
=
shift
;
croak
'commits must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($project_id) to commits must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to commits must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/repository/commits'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
create_commit {
my
$self
=
shift
;
croak
'create_commit must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($project_id) to create_commit must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to create_commit must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'POST'
,
'projects/:project_id/repository/commits'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
commit {
my
$self
=
shift
;
croak
'commit must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to commit must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($commit_sha) to commit must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/repository/commits/:commit_sha'
, [
@_
],
$options
);
}
Hide Show 12 lines of Pod
sub
commit_refs {
my
$self
=
shift
;
croak
'commit_refs must be called with 2 to 3 arguments'
if
@_
< 2 or
@_
> 3;
croak
'The #1 argument ($project_id) to commit_refs must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($commit_sha) to commit_refs must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The last argument (\%params) to commit_refs must be a hash ref'
if
defined
(
$_
[2]) and
ref
(
$_
[2]) ne
'HASH'
;
my
$params
= (
@_
== 3) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/repository/commits/:commit_sha/refs'
, [
@_
],
$options
);
}
Hide Show 12 lines of Pod
sub
cherry_pick_commit {
my
$self
=
shift
;
croak
'cherry_pick_commit must be called with 2 to 3 arguments'
if
@_
< 2 or
@_
> 3;
croak
'The #1 argument ($project_id) to cherry_pick_commit must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($commit_sha) to cherry_pick_commit must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The last argument (\%params) to cherry_pick_commit must be a hash ref'
if
defined
(
$_
[2]) and
ref
(
$_
[2]) ne
'HASH'
;
my
$params
= (
@_
== 3) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'POST'
,
'projects/:project_id/repository/commits/:commit_sha/cherry_pick'
, [
@_
],
$options
);
}
Hide Show 12 lines of Pod
sub
commit_diff {
my
$self
=
shift
;
croak
'commit_diff must be called with 2 to 3 arguments'
if
@_
< 2 or
@_
> 3;
croak
'The #1 argument ($project_id) to commit_diff must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($commit_sha) to commit_diff must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The last argument (\%params) to commit_diff must be a hash ref'
if
defined
(
$_
[2]) and
ref
(
$_
[2]) ne
'HASH'
;
my
$params
= (
@_
== 3) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/repository/commits/:commit_sha/diff'
, [
@_
],
$options
);
}
Hide Show 12 lines of Pod
sub
commit_comments {
my
$self
=
shift
;
croak
'commit_comments must be called with 2 to 3 arguments'
if
@_
< 2 or
@_
> 3;
croak
'The #1 argument ($project_id) to commit_comments must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($commit_sha) to commit_comments must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The last argument (\%params) to commit_comments must be a hash ref'
if
defined
(
$_
[2]) and
ref
(
$_
[2]) ne
'HASH'
;
my
$params
= (
@_
== 3) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/repository/commits/:commit_sha/comments'
, [
@_
],
$options
);
}
Hide Show 12 lines of Pod
sub
create_commit_comment {
my
$self
=
shift
;
croak
'create_commit_comment must be called with 2 to 3 arguments'
if
@_
< 2 or
@_
> 3;
croak
'The #1 argument ($project_id) to create_commit_comment must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($commit_sha) to create_commit_comment must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The last argument (\%params) to create_commit_comment must be a hash ref'
if
defined
(
$_
[2]) and
ref
(
$_
[2]) ne
'HASH'
;
my
$params
= (
@_
== 3) ?
pop
() :
undef
;
my
$options
= {};
$options
->{decode} = 0;
$options
->{content} =
$params
if
defined
$params
;
$self
->_call_rest_client(
'POST'
,
'projects/:project_id/repository/commits/:commit_sha/comments'
, [
@_
],
$options
);
return
;
}
Hide Show 12 lines of Pod
sub
commit_statuses {
my
$self
=
shift
;
croak
'commit_statuses must be called with 2 to 3 arguments'
if
@_
< 2 or
@_
> 3;
croak
'The #1 argument ($project_id) to commit_statuses must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($commit_sha) to commit_statuses must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The last argument (\%params) to commit_statuses must be a hash ref'
if
defined
(
$_
[2]) and
ref
(
$_
[2]) ne
'HASH'
;
my
$params
= (
@_
== 3) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/repository/commits/:commit_sha/statuses'
, [
@_
],
$options
);
}
Hide Show 12 lines of Pod
sub
create_commit_status {
my
$self
=
shift
;
croak
'create_commit_status must be called with 2 to 3 arguments'
if
@_
< 2 or
@_
> 3;
croak
'The #1 argument ($project_id) to create_commit_status must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($commit_sha) to create_commit_status must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The last argument (\%params) to create_commit_status must be a hash ref'
if
defined
(
$_
[2]) and
ref
(
$_
[2]) ne
'HASH'
;
my
$params
= (
@_
== 3) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'POST'
,
'projects/:project_id/statuses/:commit_sha'
, [
@_
],
$options
);
}
Hide Show 19 lines of Pod
sub
registry_repositories_in_project {
my
$self
=
shift
;
croak
'registry_repositories_in_project must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($project_id) to registry_repositories_in_project must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to registry_repositories_in_project must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/registry/repositories'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
registry_repositories_in_group {
my
$self
=
shift
;
croak
'registry_repositories_in_group must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($group_id) to registry_repositories_in_group must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to registry_repositories_in_group must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'groups/:group_id/registry/repositories'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
delete_registry_repository {
my
$self
=
shift
;
croak
'delete_registry_repository must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to delete_registry_repository must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($repository_id) to delete_registry_repository must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
$options
->{decode} = 0;
$self
->_call_rest_client(
'DELETE'
,
'projects/:project_id/registry/repositories/:repository_id'
, [
@_
],
$options
);
return
;
}
Hide Show 11 lines of Pod
sub
registry_repository_tags {
my
$self
=
shift
;
croak
'registry_repository_tags must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to registry_repository_tags must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($repository_id) to registry_repository_tags must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/registry/repositories/:repository_id/tags'
, [
@_
],
$options
);
}
Hide Show 12 lines of Pod
sub
registry_repository_tag {
my
$self
=
shift
;
croak
'registry_repository_tag must be called with 3 arguments'
if
@_
!= 3;
croak
'The #1 argument ($project_id) to registry_repository_tag must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($repository_id) to registry_repository_tag must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The #3 argument ($tag_name) to registry_repository_tag must be a scalar'
if
ref
(
$_
[2]) or (!
defined
$_
[2]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/registry/repositories/:repository_id/tags/:tag_name'
, [
@_
],
$options
);
}
Hide Show 12 lines of Pod
sub
delete_registry_repository_tag {
my
$self
=
shift
;
croak
'delete_registry_repository_tag must be called with 3 arguments'
if
@_
!= 3;
croak
'The #1 argument ($project_id) to delete_registry_repository_tag must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($repository_id) to delete_registry_repository_tag must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The #3 argument ($tag_name) to delete_registry_repository_tag must be a scalar'
if
ref
(
$_
[2]) or (!
defined
$_
[2]);
my
$options
= {};
$options
->{decode} = 0;
$self
->_call_rest_client(
'DELETE'
,
'projects/:project_id/registry/repositories/:repository_id/tags/:tag_name'
, [
@_
],
$options
);
return
;
}
Hide Show 12 lines of Pod
sub
bulk_delete_registry_repository_tags {
my
$self
=
shift
;
croak
'bulk_delete_registry_repository_tags must be called with 2 to 3 arguments'
if
@_
< 2 or
@_
> 3;
croak
'The #1 argument ($project_id) to bulk_delete_registry_repository_tags must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($repository_id) to bulk_delete_registry_repository_tags must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The last argument (\%params) to bulk_delete_registry_repository_tags must be a hash ref'
if
defined
(
$_
[2]) and
ref
(
$_
[2]) ne
'HASH'
;
my
$params
= (
@_
== 3) ?
pop
() :
undef
;
my
$options
= {};
$options
->{decode} = 0;
$options
->{content} =
$params
if
defined
$params
;
$self
->_call_rest_client(
'DELETE'
,
'projects/:project_id/registry/repositories/:repository_id/tags'
, [
@_
],
$options
);
return
;
}
Hide Show 18 lines of Pod
sub
custom_user_attributes {
my
$self
=
shift
;
croak
'custom_user_attributes must be called with 1 arguments'
if
@_
!= 1;
croak
'The #1 argument ($user_id) to custom_user_attributes must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'users/:user_id/custom_attributes'
, [
@_
],
$options
);
}
Hide Show 10 lines of Pod
sub
custom_group_attributes {
my
$self
=
shift
;
croak
'custom_group_attributes must be called with 1 arguments'
if
@_
!= 1;
croak
'The #1 argument ($group_id) to custom_group_attributes must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'groups/:group_id/custom_attributes'
, [
@_
],
$options
);
}
Hide Show 10 lines of Pod
sub
custom_project_attributes {
my
$self
=
shift
;
croak
'custom_project_attributes must be called with 1 arguments'
if
@_
!= 1;
croak
'The #1 argument ($project_id) to custom_project_attributes must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/custom_attributes'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
custom_user_attribute {
my
$self
=
shift
;
croak
'custom_user_attribute must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($user_id) to custom_user_attribute must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($attribute_key) to custom_user_attribute must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'users/:user_id/custom_attributes/:attribute_key'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
custom_group_attribute {
my
$self
=
shift
;
croak
'custom_group_attribute must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($group_id) to custom_group_attribute must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($attribute_key) to custom_group_attribute must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'groups/:group_id/custom_attributes/:attribute_key'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
custom_project_attribute {
my
$self
=
shift
;
croak
'custom_project_attribute must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to custom_project_attribute must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($attribute_key) to custom_project_attribute must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/custom_attributes/:attribute_key'
, [
@_
],
$options
);
}
Hide Show 12 lines of Pod
sub
set_custom_user_attribute {
my
$self
=
shift
;
croak
'set_custom_user_attribute must be called with 2 to 3 arguments'
if
@_
< 2 or
@_
> 3;
croak
'The #1 argument ($user_id) to set_custom_user_attribute must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($attribute_key) to set_custom_user_attribute must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The last argument (\%params) to set_custom_user_attribute must be a hash ref'
if
defined
(
$_
[2]) and
ref
(
$_
[2]) ne
'HASH'
;
my
$params
= (
@_
== 3) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'PUT'
,
'users/:user_id/custom_attributes/:attribute_key'
, [
@_
],
$options
);
}
Hide Show 12 lines of Pod
sub
set_custom_group_attribute {
my
$self
=
shift
;
croak
'set_custom_group_attribute must be called with 2 to 3 arguments'
if
@_
< 2 or
@_
> 3;
croak
'The #1 argument ($group_id) to set_custom_group_attribute must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($attribute_key) to set_custom_group_attribute must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The last argument (\%params) to set_custom_group_attribute must be a hash ref'
if
defined
(
$_
[2]) and
ref
(
$_
[2]) ne
'HASH'
;
my
$params
= (
@_
== 3) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'PUT'
,
'groups/:group_id/custom_attributes/:attribute_key'
, [
@_
],
$options
);
}
Hide Show 12 lines of Pod
sub
set_custom_project_attribute {
my
$self
=
shift
;
croak
'set_custom_project_attribute must be called with 2 to 3 arguments'
if
@_
< 2 or
@_
> 3;
croak
'The #1 argument ($project_id) to set_custom_project_attribute must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($attribute_key) to set_custom_project_attribute must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The last argument (\%params) to set_custom_project_attribute must be a hash ref'
if
defined
(
$_
[2]) and
ref
(
$_
[2]) ne
'HASH'
;
my
$params
= (
@_
== 3) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'PUT'
,
'projects/:project_id/custom_attributes/:attribute_key'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
delete_custom_user_attribute {
my
$self
=
shift
;
croak
'delete_custom_user_attribute must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($user_id) to delete_custom_user_attribute must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($attribute_key) to delete_custom_user_attribute must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
$options
->{decode} = 0;
$self
->_call_rest_client(
'DELETE'
,
'users/:user_id/custom_attributes/:attribute_key'
, [
@_
],
$options
);
return
;
}
Hide Show 11 lines of Pod
sub
delete_custom_group_attribute {
my
$self
=
shift
;
croak
'delete_custom_group_attribute must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($group_id) to delete_custom_group_attribute must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($attribute_key) to delete_custom_group_attribute must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
$options
->{decode} = 0;
$self
->_call_rest_client(
'DELETE'
,
'groups/:group_id/custom_attributes/:attribute_key'
, [
@_
],
$options
);
return
;
}
Hide Show 11 lines of Pod
sub
delete_custom_project_attribute {
my
$self
=
shift
;
croak
'delete_custom_project_attribute must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to delete_custom_project_attribute must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($attribute_key) to delete_custom_project_attribute must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
$options
->{decode} = 0;
$self
->_call_rest_client(
'DELETE'
,
'projects/:project_id/custom_attributes/:attribute_key'
, [
@_
],
$options
);
return
;
}
Hide Show 19 lines of Pod
sub
deployments {
my
$self
=
shift
;
croak
'deployments must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($project_id) to deployments must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to deployments must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/deployments'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
deployment {
my
$self
=
shift
;
croak
'deployment must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to deployment must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($deployment_id) to deployment must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/deployments/:deployment_id'
, [
@_
],
$options
);
}
Hide Show 18 lines of Pod
sub
all_deploy_keys {
my
$self
=
shift
;
croak
'all_deploy_keys must be called with 0 to 1 arguments'
if
@_
< 0 or
@_
> 1;
croak
'The last argument (\%params) to all_deploy_keys must be a hash ref'
if
defined
(
$_
[0]) and
ref
(
$_
[0]) ne
'HASH'
;
my
$params
= (
@_
== 1) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'deploy_keys'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
deploy_keys {
my
$self
=
shift
;
croak
'deploy_keys must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($project_id) to deploy_keys must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to deploy_keys must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/deploy_keys'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
deploy_key {
my
$self
=
shift
;
croak
'deploy_key must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to deploy_key must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($key_id) to deploy_key must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/deploy_keys/:key_id'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
create_deploy_key {
my
$self
=
shift
;
croak
'create_deploy_key must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($project_id) to create_deploy_key must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to create_deploy_key must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'POST'
,
'projects/:project_id/deploy_keys'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
delete_deploy_key {
my
$self
=
shift
;
croak
'delete_deploy_key must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to delete_deploy_key must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($key_id) to delete_deploy_key must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
$options
->{decode} = 0;
$self
->_call_rest_client(
'DELETE'
,
'projects/:project_id/deploy_keys/:key_id'
, [
@_
],
$options
);
return
;
}
Hide Show 11 lines of Pod
sub
enable_deploy_key {
my
$self
=
shift
;
croak
'enable_deploy_key must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to enable_deploy_key must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($key_id) to enable_deploy_key must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
return
$self
->_call_rest_client(
'POST'
,
'projects/:project_id/deploy_keys/:key_id/enable'
, [
@_
],
$options
);
}
Hide Show 19 lines of Pod
sub
environments {
my
$self
=
shift
;
croak
'environments must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($project_id) to environments must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to environments must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/environments'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
create_environment {
my
$self
=
shift
;
croak
'create_environment must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($project_id) to create_environment must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to create_environment must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'POST'
,
'projects/:project_id/environments'
, [
@_
],
$options
);
}
Hide Show 12 lines of Pod
sub
edit_environment {
my
$self
=
shift
;
croak
'edit_environment must be called with 2 to 3 arguments'
if
@_
< 2 or
@_
> 3;
croak
'The #1 argument ($project_id) to edit_environment must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($environments_id) to edit_environment must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The last argument (\%params) to edit_environment must be a hash ref'
if
defined
(
$_
[2]) and
ref
(
$_
[2]) ne
'HASH'
;
my
$params
= (
@_
== 3) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'PUT'
,
'projects/:project_id/environments/:environments_id'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
delete_environment {
my
$self
=
shift
;
croak
'delete_environment must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to delete_environment must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($environment_id) to delete_environment must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
$options
->{decode} = 0;
$self
->_call_rest_client(
'DELETE'
,
'projects/:project_id/environments/:environment_id'
, [
@_
],
$options
);
return
;
}
Hide Show 11 lines of Pod
sub
stop_environment {
my
$self
=
shift
;
croak
'stop_environment must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to stop_environment must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($environment_id) to stop_environment must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
return
$self
->_call_rest_client(
'POST'
,
'projects/:project_id/environments/:environment_id/stop'
, [
@_
],
$options
);
}
Hide Show 18 lines of Pod
sub
all_events {
my
$self
=
shift
;
croak
'all_events must be called with 0 to 1 arguments'
if
@_
< 0 or
@_
> 1;
croak
'The last argument (\%params) to all_events must be a hash ref'
if
defined
(
$_
[0]) and
ref
(
$_
[0]) ne
'HASH'
;
my
$params
= (
@_
== 1) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'events'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
user_events {
my
$self
=
shift
;
croak
'user_events must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($user_id) to user_events must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to user_events must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'users/:user_id/events'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
project_events {
my
$self
=
shift
;
croak
'project_events must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($project_id) to project_events must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to project_events must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/events'
, [
@_
],
$options
);
}
Hide Show 16 lines of Pod
sub
features {
my
$self
=
shift
;
croak
"The features method does not take any arguments"
if
@_
;
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'features'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
set_feature {
my
$self
=
shift
;
croak
'set_feature must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($name) to set_feature must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to set_feature must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'POST'
,
'features/:name'
, [
@_
],
$options
);
}
Hide Show 18 lines of Pod
sub
gitignores_templates {
my
$self
=
shift
;
croak
'gitignores_templates must be called with 0 to 1 arguments'
if
@_
< 0 or
@_
> 1;
croak
'The last argument (\%params) to gitignores_templates must be a hash ref'
if
defined
(
$_
[0]) and
ref
(
$_
[0]) ne
'HASH'
;
my
$params
= (
@_
== 1) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'templates/gitignores'
, [
@_
],
$options
);
}
Hide Show 10 lines of Pod
sub
gitignores_template {
my
$self
=
shift
;
croak
'gitignores_template must be called with 1 arguments'
if
@_
!= 1;
croak
'The #1 argument ($template_key) to gitignores_template must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'templates/gitignores/:template_key'
, [
@_
],
$options
);
}
Hide Show 18 lines of Pod
sub
gitlab_ci_ymls_templates {
my
$self
=
shift
;
croak
'gitlab_ci_ymls_templates must be called with 0 to 1 arguments'
if
@_
< 0 or
@_
> 1;
croak
'The last argument (\%params) to gitlab_ci_ymls_templates must be a hash ref'
if
defined
(
$_
[0]) and
ref
(
$_
[0]) ne
'HASH'
;
my
$params
= (
@_
== 1) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'templates/gitlab_ci_ymls'
, [
@_
],
$options
);
}
Hide Show 10 lines of Pod
sub
gitlab_ci_ymls_template {
my
$self
=
shift
;
croak
'gitlab_ci_ymls_template must be called with 1 arguments'
if
@_
!= 1;
croak
'The #1 argument ($template_key) to gitlab_ci_ymls_template must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'templates/gitlab_ci_ymls/:template_key'
, [
@_
],
$options
);
}
Hide Show 18 lines of Pod
sub
groups {
my
$self
=
shift
;
croak
'groups must be called with 0 to 1 arguments'
if
@_
< 0 or
@_
> 1;
croak
'The last argument (\%params) to groups must be a hash ref'
if
defined
(
$_
[0]) and
ref
(
$_
[0]) ne
'HASH'
;
my
$params
= (
@_
== 1) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'groups'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
group_subgroups {
my
$self
=
shift
;
croak
'group_subgroups must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($group_id) to group_subgroups must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to group_subgroups must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'groups/:group_id/subgroups'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
group_projects {
my
$self
=
shift
;
croak
'group_projects must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($group_id) to group_projects must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to group_projects must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'groups/:group_id/projects'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
group {
my
$self
=
shift
;
croak
'group must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($group_id) to group must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to group must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'groups/:group_id'
, [
@_
],
$options
);
}
Hide Show 10 lines of Pod
sub
create_group {
my
$self
=
shift
;
croak
'create_group must be called with 0 to 1 arguments'
if
@_
< 0 or
@_
> 1;
croak
'The last argument (\%params) to create_group must be a hash ref'
if
defined
(
$_
[0]) and
ref
(
$_
[0]) ne
'HASH'
;
my
$params
= (
@_
== 1) ?
pop
() :
undef
;
my
$options
= {};
$options
->{decode} = 0;
$options
->{content} =
$params
if
defined
$params
;
$self
->_call_rest_client(
'POST'
,
'groups'
, [
@_
],
$options
);
return
;
}
Hide Show 11 lines of Pod
sub
transfer_project_to_group {
my
$self
=
shift
;
croak
'transfer_project_to_group must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($group_id) to transfer_project_to_group must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($project_id) to transfer_project_to_group must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
$options
->{decode} = 0;
$self
->_call_rest_client(
'POST'
,
'groups/:group_id/projects/:project_id'
, [
@_
],
$options
);
return
;
}
Hide Show 11 lines of Pod
sub
edit_group {
my
$self
=
shift
;
croak
'edit_group must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($group_id) to edit_group must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to edit_group must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'PUT'
,
'groups/:group_id'
, [
@_
],
$options
);
}
Hide Show 10 lines of Pod
sub
delete_group {
my
$self
=
shift
;
croak
'delete_group must be called with 1 arguments'
if
@_
!= 1;
croak
'The #1 argument ($group_id) to delete_group must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
my
$options
= {};
$options
->{decode} = 0;
$self
->_call_rest_client(
'DELETE'
,
'groups/:group_id'
, [
@_
],
$options
);
return
;
}
Hide Show 10 lines of Pod
sub
sync_group_with_ldap {
my
$self
=
shift
;
croak
'sync_group_with_ldap must be called with 1 arguments'
if
@_
!= 1;
croak
'The #1 argument ($group_id) to sync_group_with_ldap must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
my
$options
= {};
$options
->{decode} = 0;
$self
->_call_rest_client(
'POST'
,
'groups/:group_id/ldap_sync'
, [
@_
],
$options
);
return
;
}
Hide Show 11 lines of Pod
sub
create_ldap_group_link {
my
$self
=
shift
;
croak
'create_ldap_group_link must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($group_id) to create_ldap_group_link must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to create_ldap_group_link must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{decode} = 0;
$options
->{content} =
$params
if
defined
$params
;
$self
->_call_rest_client(
'POST'
,
'groups/:group_id/ldap_group_links'
, [
@_
],
$options
);
return
;
}
Hide Show 11 lines of Pod
sub
delete_ldap_group_link {
my
$self
=
shift
;
croak
'delete_ldap_group_link must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($group_id) to delete_ldap_group_link must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($cn) to delete_ldap_group_link must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
$options
->{decode} = 0;
$self
->_call_rest_client(
'DELETE'
,
'groups/:group_id/ldap_group_links/:cn'
, [
@_
],
$options
);
return
;
}
Hide Show 12 lines of Pod
sub
delete_ldap_provider_group_link {
my
$self
=
shift
;
croak
'delete_ldap_provider_group_link must be called with 3 arguments'
if
@_
!= 3;
croak
'The #1 argument ($group_id) to delete_ldap_provider_group_link must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($provider) to delete_ldap_provider_group_link must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The #3 argument ($cn) to delete_ldap_provider_group_link must be a scalar'
if
ref
(
$_
[2]) or (!
defined
$_
[2]);
my
$options
= {};
$options
->{decode} = 0;
$self
->_call_rest_client(
'DELETE'
,
'groups/:group_id/ldap_group_links/:provider/:cn'
, [
@_
],
$options
);
return
;
}
Hide Show 11 lines of Pod
sub
share_group_with_group {
my
$self
=
shift
;
croak
'share_group_with_group must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($group_id) to share_group_with_group must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to share_group_with_group must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{decode} = 0;
$options
->{content} =
$params
if
defined
$params
;
$self
->_call_rest_client(
'POST'
,
'groups/:group_id/share'
, [
@_
],
$options
);
return
;
}
Hide Show 11 lines of Pod
sub
unshare_group_with_group {
my
$self
=
shift
;
croak
'unshare_group_with_group must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($group_id) to unshare_group_with_group must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($shared_with_group_id) to unshare_group_with_group must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
$options
->{decode} = 0;
$self
->_call_rest_client(
'DELETE'
,
'groups/:group_id/share/:shared_with_group_id'
, [
@_
],
$options
);
return
;
}
Hide Show 19 lines of Pod
sub
group_access_requests {
my
$self
=
shift
;
croak
'group_access_requests must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($group_id) to group_access_requests must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to group_access_requests must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'groups/:group_id/access_requests'
, [
@_
],
$options
);
}
Hide Show 10 lines of Pod
sub
request_group_access {
my
$self
=
shift
;
croak
'request_group_access must be called with 1 arguments'
if
@_
!= 1;
croak
'The #1 argument ($group_id) to request_group_access must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
my
$options
= {};
return
$self
->_call_rest_client(
'POST'
,
'groups/:group_id/access_requests'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
approve_group_access {
my
$self
=
shift
;
croak
'approve_group_access must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($group_id) to approve_group_access must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($user_id) to approve_group_access must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
return
$self
->_call_rest_client(
'PUT'
,
'groups/:group_id/access_requests/:user_id/approve'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
deny_group_access {
my
$self
=
shift
;
croak
'deny_group_access must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($group_id) to deny_group_access must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($user_id) to deny_group_access must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
$options
->{decode} = 0;
$self
->_call_rest_client(
'DELETE'
,
'groups/:group_id/access_requests/:user_id'
, [
@_
],
$options
);
return
;
}
Hide Show 18 lines of Pod
sub
group_badges {
my
$self
=
shift
;
croak
'group_badges must be called with 1 arguments'
if
@_
!= 1;
croak
'The #1 argument ($group_id) to group_badges must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'groups/:group_id/badges'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
group_badge {
my
$self
=
shift
;
croak
'group_badge must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($group_id) to group_badge must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($badge_id) to group_badge must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'groups/:group_id/badges/:badge_id'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
create_group_badge {
my
$self
=
shift
;
croak
'create_group_badge must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($group_id) to create_group_badge must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to create_group_badge must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'POST'
,
'groups/:group_id/badges'
, [
@_
],
$options
);
}
Hide Show 12 lines of Pod
sub
edit_group_badge {
my
$self
=
shift
;
croak
'edit_group_badge must be called with 2 to 3 arguments'
if
@_
< 2 or
@_
> 3;
croak
'The #1 argument ($group_id) to edit_group_badge must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($badge_id) to edit_group_badge must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The last argument (\%params) to edit_group_badge must be a hash ref'
if
defined
(
$_
[2]) and
ref
(
$_
[2]) ne
'HASH'
;
my
$params
= (
@_
== 3) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'PUT'
,
'groups/:group_id/badges/:badge_id'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
delete_group_badge {
my
$self
=
shift
;
croak
'delete_group_badge must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($group_id) to delete_group_badge must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($badge_id) to delete_group_badge must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
$options
->{decode} = 0;
$self
->_call_rest_client(
'DELETE'
,
'groups/:group_id/badges/:badge_id'
, [
@_
],
$options
);
return
;
}
Hide Show 11 lines of Pod
sub
preview_group_badge {
my
$self
=
shift
;
croak
'preview_group_badge must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($group_id) to preview_group_badge must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to preview_group_badge must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'groups/:group_id/badges/render'
, [
@_
],
$options
);
}
Hide Show 19 lines of Pod
sub
group_members {
my
$self
=
shift
;
croak
'group_members must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($group_id) to group_members must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to group_members must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'groups/:group_id/members'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
all_group_members {
my
$self
=
shift
;
croak
'all_group_members must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($group_id) to all_group_members must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to all_group_members must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'groups/:group_id/members/all'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
group_member {
my
$self
=
shift
;
croak
'group_member must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to group_member must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($user_id) to group_member must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'groups/:project_id/members/:user_id'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
add_group_member {
my
$self
=
shift
;
croak
'add_group_member must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($group_id) to add_group_member must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to add_group_member must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'POST'
,
'groups/:group_id/members'
, [
@_
],
$options
);
}
Hide Show 12 lines of Pod
sub
update_group_member {
my
$self
=
shift
;
croak
'update_group_member must be called with 2 to 3 arguments'
if
@_
< 2 or
@_
> 3;
croak
'The #1 argument ($group_id) to update_group_member must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($user_id) to update_group_member must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The last argument (\%params) to update_group_member must be a hash ref'
if
defined
(
$_
[2]) and
ref
(
$_
[2]) ne
'HASH'
;
my
$params
= (
@_
== 3) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'PUT'
,
'groups/:group_id/members/:user_id'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
remove_group_member {
my
$self
=
shift
;
croak
'remove_group_member must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($group_id) to remove_group_member must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($user_id) to remove_group_member must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
$options
->{decode} = 0;
$self
->_call_rest_client(
'DELETE'
,
'groups/:group_id/members/:user_id'
, [
@_
],
$options
);
return
;
}
Hide Show 18 lines of Pod
sub
global_issues {
my
$self
=
shift
;
croak
'global_issues must be called with 0 to 1 arguments'
if
@_
< 0 or
@_
> 1;
croak
'The last argument (\%params) to global_issues must be a hash ref'
if
defined
(
$_
[0]) and
ref
(
$_
[0]) ne
'HASH'
;
my
$params
= (
@_
== 1) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'issues'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
group_issues {
my
$self
=
shift
;
croak
'group_issues must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($group_id) to group_issues must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to group_issues must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'groups/:group_id/issues'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
issues {
my
$self
=
shift
;
croak
'issues must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($project_id) to issues must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to issues must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/issues'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
issue {
my
$self
=
shift
;
croak
'issue must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to issue must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($issue_iid) to issue must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/issues/:issue_iid'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
create_issue {
my
$self
=
shift
;
croak
'create_issue must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($project_id) to create_issue must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to create_issue must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'POST'
,
'projects/:project_id/issues'
, [
@_
],
$options
);
}
Hide Show 12 lines of Pod
sub
edit_issue {
my
$self
=
shift
;
croak
'edit_issue must be called with 2 to 3 arguments'
if
@_
< 2 or
@_
> 3;
croak
'The #1 argument ($project_id) to edit_issue must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($issue_iid) to edit_issue must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The last argument (\%params) to edit_issue must be a hash ref'
if
defined
(
$_
[2]) and
ref
(
$_
[2]) ne
'HASH'
;
my
$params
= (
@_
== 3) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'PUT'
,
'projects/:project_id/issues/:issue_iid'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
delete_issue {
my
$self
=
shift
;
croak
'delete_issue must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to delete_issue must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($issue_iid) to delete_issue must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
$options
->{decode} = 0;
$self
->_call_rest_client(
'DELETE'
,
'projects/:project_id/issues/:issue_iid'
, [
@_
],
$options
);
return
;
}
Hide Show 12 lines of Pod
sub
move_issue {
my
$self
=
shift
;
croak
'move_issue must be called with 2 to 3 arguments'
if
@_
< 2 or
@_
> 3;
croak
'The #1 argument ($project_id) to move_issue must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($issue_iid) to move_issue must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The last argument (\%params) to move_issue must be a hash ref'
if
defined
(
$_
[2]) and
ref
(
$_
[2]) ne
'HASH'
;
my
$params
= (
@_
== 3) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'POST'
,
'projects/:project_id/issues/:issue_iid/move'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
subscribe_to_issue {
my
$self
=
shift
;
croak
'subscribe_to_issue must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to subscribe_to_issue must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($issue_iid) to subscribe_to_issue must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
return
$self
->_call_rest_client(
'POST'
,
'projects/:project_id/issues/:issue_iid/subscribe'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
unsubscribe_from_issue {
my
$self
=
shift
;
croak
'unsubscribe_from_issue must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to unsubscribe_from_issue must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($issue_iid) to unsubscribe_from_issue must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
return
$self
->_call_rest_client(
'POST'
,
'projects/:project_id/issues/:issue_iid/unsubscribe'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
create_issue_todo {
my
$self
=
shift
;
croak
'create_issue_todo must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to create_issue_todo must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($issue_iid) to create_issue_todo must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
return
$self
->_call_rest_client(
'POST'
,
'projects/:project_id/issues/:issue_iid/todo'
, [
@_
],
$options
);
}
Hide Show 12 lines of Pod
sub
set_issue_time_estimate {
my
$self
=
shift
;
croak
'set_issue_time_estimate must be called with 2 to 3 arguments'
if
@_
< 2 or
@_
> 3;
croak
'The #1 argument ($project_id) to set_issue_time_estimate must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($issue_iid) to set_issue_time_estimate must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The last argument (\%params) to set_issue_time_estimate must be a hash ref'
if
defined
(
$_
[2]) and
ref
(
$_
[2]) ne
'HASH'
;
my
$params
= (
@_
== 3) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'POST'
,
'projects/:project_id/issues/:issue_iid/time_estimate'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
reset_issue_time_estimate {
my
$self
=
shift
;
croak
'reset_issue_time_estimate must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to reset_issue_time_estimate must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($issue_iid) to reset_issue_time_estimate must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
return
$self
->_call_rest_client(
'POST'
,
'projects/:project_id/issues/:issue_iid/reset_time_estimate'
, [
@_
],
$options
);
}
Hide Show 12 lines of Pod
sub
add_issue_spent_time {
my
$self
=
shift
;
croak
'add_issue_spent_time must be called with 2 to 3 arguments'
if
@_
< 2 or
@_
> 3;
croak
'The #1 argument ($project_id) to add_issue_spent_time must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($issue_iid) to add_issue_spent_time must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The last argument (\%params) to add_issue_spent_time must be a hash ref'
if
defined
(
$_
[2]) and
ref
(
$_
[2]) ne
'HASH'
;
my
$params
= (
@_
== 3) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'POST'
,
'projects/:project_id/issues/:issue_iid/add_spent_time'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
reset_issue_spent_time {
my
$self
=
shift
;
croak
'reset_issue_spent_time must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to reset_issue_spent_time must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($issue_iid) to reset_issue_spent_time must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
return
$self
->_call_rest_client(
'POST'
,
'projects/:project_id/issues/:issue_iid/reset_spent_time'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
issue_time_stats {
my
$self
=
shift
;
croak
'issue_time_stats must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to issue_time_stats must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($issue_iid) to issue_time_stats must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/issues/:issue_iid/time_stats'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
issue_closed_by {
my
$self
=
shift
;
croak
'issue_closed_by must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to issue_closed_by must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($issue_iid) to issue_closed_by must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/issues/:issue_iid/closed_by'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
issue_user_agent_detail {
my
$self
=
shift
;
croak
'issue_user_agent_detail must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to issue_user_agent_detail must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($issue_iid) to issue_user_agent_detail must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/issues/:issue_iid/user_agent_detail'
, [
@_
],
$options
);
}
Hide Show 19 lines of Pod
sub
project_boards {
my
$self
=
shift
;
croak
'project_boards must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($project_id) to project_boards must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to project_boards must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/boards'
, [
@_
],
$options
);
}
Hide Show 12 lines of Pod
sub
project_board_lists {
my
$self
=
shift
;
croak
'project_board_lists must be called with 2 to 3 arguments'
if
@_
< 2 or
@_
> 3;
croak
'The #1 argument ($project_id) to project_board_lists must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($board_id) to project_board_lists must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The last argument (\%params) to project_board_lists must be a hash ref'
if
defined
(
$_
[2]) and
ref
(
$_
[2]) ne
'HASH'
;
my
$params
= (
@_
== 3) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/boards/:board_id/lists'
, [
@_
],
$options
);
}
Hide Show 12 lines of Pod
sub
project_board_list {
my
$self
=
shift
;
croak
'project_board_list must be called with 3 arguments'
if
@_
!= 3;
croak
'The #1 argument ($project_id) to project_board_list must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($board_id) to project_board_list must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The #3 argument ($list_id) to project_board_list must be a scalar'
if
ref
(
$_
[2]) or (!
defined
$_
[2]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/boards/:board_id/lists/:list_id'
, [
@_
],
$options
);
}
Hide Show 12 lines of Pod
sub
create_project_board_list {
my
$self
=
shift
;
croak
'create_project_board_list must be called with 2 to 3 arguments'
if
@_
< 2 or
@_
> 3;
croak
'The #1 argument ($project_id) to create_project_board_list must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($board_id) to create_project_board_list must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The last argument (\%params) to create_project_board_list must be a hash ref'
if
defined
(
$_
[2]) and
ref
(
$_
[2]) ne
'HASH'
;
my
$params
= (
@_
== 3) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'POST'
,
'projects/:project_id/boards/:board_id/lists'
, [
@_
],
$options
);
}
Hide Show 13 lines of Pod
sub
edit_project_board_list {
my
$self
=
shift
;
croak
'edit_project_board_list must be called with 3 to 4 arguments'
if
@_
< 3 or
@_
> 4;
croak
'The #1 argument ($project_id) to edit_project_board_list must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($board_id) to edit_project_board_list must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The #3 argument ($list_id) to edit_project_board_list must be a scalar'
if
ref
(
$_
[2]) or (!
defined
$_
[2]);
croak
'The last argument (\%params) to edit_project_board_list must be a hash ref'
if
defined
(
$_
[3]) and
ref
(
$_
[3]) ne
'HASH'
;
my
$params
= (
@_
== 4) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'PUT'
,
'projects/:project_id/boards/:board_id/lists/:list_id'
, [
@_
],
$options
);
}
Hide Show 12 lines of Pod
sub
delete_project_board_list {
my
$self
=
shift
;
croak
'delete_project_board_list must be called with 3 arguments'
if
@_
!= 3;
croak
'The #1 argument ($project_id) to delete_project_board_list must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($board_id) to delete_project_board_list must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The #3 argument ($list_id) to delete_project_board_list must be a scalar'
if
ref
(
$_
[2]) or (!
defined
$_
[2]);
my
$options
= {};
$options
->{decode} = 0;
$self
->_call_rest_client(
'DELETE'
,
'projects/:project_id/boards/:board_id/lists/:list_id'
, [
@_
],
$options
);
return
;
}
Hide Show 18 lines of Pod
sub
group_boards {
my
$self
=
shift
;
croak
'group_boards must be called with 1 arguments'
if
@_
!= 1;
croak
'The #1 argument ($group_id) to group_boards must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'groups/:group_id/boards'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
group_board {
my
$self
=
shift
;
croak
'group_board must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($group_id) to group_board must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($board_id) to group_board must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'groups/:group_id/boards/:board_id'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
group_board_lists {
my
$self
=
shift
;
croak
'group_board_lists must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($group_id) to group_board_lists must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($board_id) to group_board_lists must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'groups/:group_id/boards/:board_id/lists'
, [
@_
],
$options
);
}
Hide Show 12 lines of Pod
sub
group_board_list {
my
$self
=
shift
;
croak
'group_board_list must be called with 3 arguments'
if
@_
!= 3;
croak
'The #1 argument ($group_id) to group_board_list must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($board_id) to group_board_list must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The #3 argument ($list_id) to group_board_list must be a scalar'
if
ref
(
$_
[2]) or (!
defined
$_
[2]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'groups/:group_id/boards/:board_id/lists/:list_id'
, [
@_
],
$options
);
}
Hide Show 12 lines of Pod
sub
create_group_board_list {
my
$self
=
shift
;
croak
'create_group_board_list must be called with 2 to 3 arguments'
if
@_
< 2 or
@_
> 3;
croak
'The #1 argument ($group_id) to create_group_board_list must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($board_id) to create_group_board_list must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The last argument (\%params) to create_group_board_list must be a hash ref'
if
defined
(
$_
[2]) and
ref
(
$_
[2]) ne
'HASH'
;
my
$params
= (
@_
== 3) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'POST'
,
'groups/:group_id/boards/:board_id/lists'
, [
@_
],
$options
);
}
Hide Show 13 lines of Pod
sub
edit_group_board_list {
my
$self
=
shift
;
croak
'edit_group_board_list must be called with 3 to 4 arguments'
if
@_
< 3 or
@_
> 4;
croak
'The #1 argument ($group_id) to edit_group_board_list must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($board_id) to edit_group_board_list must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The #3 argument ($list_id) to edit_group_board_list must be a scalar'
if
ref
(
$_
[2]) or (!
defined
$_
[2]);
croak
'The last argument (\%params) to edit_group_board_list must be a hash ref'
if
defined
(
$_
[3]) and
ref
(
$_
[3]) ne
'HASH'
;
my
$params
= (
@_
== 4) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'PUT'
,
'groups/:group_id/boards/:board_id/lists/:list_id'
, [
@_
],
$options
);
}
Hide Show 12 lines of Pod
sub
delete_group_board_list {
my
$self
=
shift
;
croak
'delete_group_board_list must be called with 3 arguments'
if
@_
!= 3;
croak
'The #1 argument ($group_id) to delete_group_board_list must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($board_id) to delete_group_board_list must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The #3 argument ($list_id) to delete_group_board_list must be a scalar'
if
ref
(
$_
[2]) or (!
defined
$_
[2]);
my
$options
= {};
$options
->{decode} = 0;
$self
->_call_rest_client(
'DELETE'
,
'groups/:group_id/boards/:board_id/lists/:list_id'
, [
@_
],
$options
);
return
;
}
Hide Show 19 lines of Pod
sub
jobs {
my
$self
=
shift
;
croak
'jobs must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($project_id) to jobs must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to jobs must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/jobs'
, [
@_
],
$options
);
}
Hide Show 12 lines of Pod
sub
pipeline_jobs {
my
$self
=
shift
;
croak
'pipeline_jobs must be called with 2 to 3 arguments'
if
@_
< 2 or
@_
> 3;
croak
'The #1 argument ($project_id) to pipeline_jobs must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($pipeline_id) to pipeline_jobs must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The last argument (\%params) to pipeline_jobs must be a hash ref'
if
defined
(
$_
[2]) and
ref
(
$_
[2]) ne
'HASH'
;
my
$params
= (
@_
== 3) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/pipelines/:pipeline_id/jobs'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
job {
my
$self
=
shift
;
croak
'job must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to job must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($job_id) to job must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/jobs/:job_id'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
job_artifacts {
my
$self
=
shift
;
croak
'job_artifacts must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to job_artifacts must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($job_id) to job_artifacts must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/jobs/:job_id/artifacts'
, [
@_
],
$options
);
}
Hide Show 12 lines of Pod
sub
job_artifacts_archive {
my
$self
=
shift
;
croak
'job_artifacts_archive must be called with 2 to 3 arguments'
if
@_
< 2 or
@_
> 3;
croak
'The #1 argument ($project_id) to job_artifacts_archive must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($ref_name) to job_artifacts_archive must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The last argument (\%params) to job_artifacts_archive must be a hash ref'
if
defined
(
$_
[2]) and
ref
(
$_
[2]) ne
'HASH'
;
my
$params
= (
@_
== 3) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/jobs/artifacts/:ref_name/download'
, [
@_
],
$options
);
}
Hide Show 12 lines of Pod
sub
job_artifacts_file {
my
$self
=
shift
;
croak
'job_artifacts_file must be called with 3 arguments'
if
@_
!= 3;
croak
'The #1 argument ($project_id) to job_artifacts_file must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($job_id) to job_artifacts_file must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The #3 argument ($artifact_path) to job_artifacts_file must be a scalar'
if
ref
(
$_
[2]) or (!
defined
$_
[2]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/jobs/:job_id/artifacts/:artifact_path'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
job_trace_file {
my
$self
=
shift
;
croak
'job_trace_file must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to job_trace_file must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($job_id) to job_trace_file must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/jobs/:job_id/trace'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
cancel_job {
my
$self
=
shift
;
croak
'cancel_job must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to cancel_job must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($job_id) to cancel_job must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
return
$self
->_call_rest_client(
'POST'
,
'projects/:project_id/jobs/:job_id/cancel'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
retry_job {
my
$self
=
shift
;
croak
'retry_job must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to retry_job must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($job_id) to retry_job must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
return
$self
->_call_rest_client(
'POST'
,
'projects/:project_id/jobs/:job_id/retry'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
erase_job {
my
$self
=
shift
;
croak
'erase_job must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to erase_job must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($job_id) to erase_job must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
return
$self
->_call_rest_client(
'POST'
,
'projects/:project_id/jobs/:job_id/erase'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
keep_job_artifacts {
my
$self
=
shift
;
croak
'keep_job_artifacts must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to keep_job_artifacts must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($job_id) to keep_job_artifacts must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
return
$self
->_call_rest_client(
'POST'
,
'projects/:project_id/jobs/:job_id/artifacts/keep'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
play_job {
my
$self
=
shift
;
croak
'play_job must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to play_job must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($job_id) to play_job must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
return
$self
->_call_rest_client(
'POST'
,
'projects/:project_id/jobs/:job_id/play'
, [
@_
],
$options
);
}
Hide Show 18 lines of Pod
sub
key {
my
$self
=
shift
;
croak
'key must be called with 1 arguments'
if
@_
!= 1;
croak
'The #1 argument ($key_id) to key must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'keys/:key_id'
, [
@_
],
$options
);
}
Hide Show 19 lines of Pod
sub
labels {
my
$self
=
shift
;
croak
'labels must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($project_id) to labels must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to labels must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/labels'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
create_label {
my
$self
=
shift
;
croak
'create_label must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($project_id) to create_label must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to create_label must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'POST'
,
'projects/:project_id/labels'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
delete_label {
my
$self
=
shift
;
croak
'delete_label must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($project_id) to delete_label must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to delete_label must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{decode} = 0;
$options
->{content} =
$params
if
defined
$params
;
$self
->_call_rest_client(
'DELETE'
,
'projects/:project_id/labels'
, [
@_
],
$options
);
return
;
}
Hide Show 11 lines of Pod
sub
edit_label {
my
$self
=
shift
;
croak
'edit_label must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($project_id) to edit_label must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to edit_label must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'PUT'
,
'projects/:project_id/labels'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
subscribe_to_label {
my
$self
=
shift
;
croak
'subscribe_to_label must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to subscribe_to_label must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($label_id) to subscribe_to_label must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
return
$self
->_call_rest_client(
'POST'
,
'projects/:project_id/labels/:label_id/subscribe'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
unsubscribe_from_label {
my
$self
=
shift
;
croak
'unsubscribe_from_label must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to unsubscribe_from_label must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($label_id) to unsubscribe_from_label must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
$options
->{decode} = 0;
$self
->_call_rest_client(
'POST'
,
'projects/:project_id/labels/:label_id/unsubscribe'
, [
@_
],
$options
);
return
;
}
Hide Show 18 lines of Pod
sub
markdown {
my
$self
=
shift
;
croak
'markdown must be called with 0 to 1 arguments'
if
@_
< 0 or
@_
> 1;
croak
'The last argument (\%params) to markdown must be a hash ref'
if
defined
(
$_
[0]) and
ref
(
$_
[0]) ne
'HASH'
;
my
$params
= (
@_
== 1) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'POST'
,
'markdown'
, [
@_
],
$options
);
}
Hide Show 18 lines of Pod
sub
global_merge_requests {
my
$self
=
shift
;
croak
'global_merge_requests must be called with 0 to 1 arguments'
if
@_
< 0 or
@_
> 1;
croak
'The last argument (\%params) to global_merge_requests must be a hash ref'
if
defined
(
$_
[0]) and
ref
(
$_
[0]) ne
'HASH'
;
my
$params
= (
@_
== 1) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'merge_requests'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
merge_requests {
my
$self
=
shift
;
croak
'merge_requests must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($project_id) to merge_requests must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to merge_requests must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/merge_requests'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
merge_request {
my
$self
=
shift
;
croak
'merge_request must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to merge_request must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($merge_request_iid) to merge_request must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/merge_requests/:merge_request_iid'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
merge_request_commits {
my
$self
=
shift
;
croak
'merge_request_commits must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to merge_request_commits must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($merge_request_iid) to merge_request_commits must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/merge_requests/:merge_request_iid/commits'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
merge_request_with_changes {
my
$self
=
shift
;
croak
'merge_request_with_changes must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to merge_request_with_changes must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($merge_request_iid) to merge_request_with_changes must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/merge_requests/:merge_request_iid/changes'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
create_merge_request {
my
$self
=
shift
;
croak
'create_merge_request must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($project_id) to create_merge_request must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to create_merge_request must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'POST'
,
'projects/:project_id/merge_requests'
, [
@_
],
$options
);
}
Hide Show 12 lines of Pod
sub
edit_merge_request {
my
$self
=
shift
;
croak
'edit_merge_request must be called with 2 to 3 arguments'
if
@_
< 2 or
@_
> 3;
croak
'The #1 argument ($project_id) to edit_merge_request must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($merge_request_iid) to edit_merge_request must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The last argument (\%params) to edit_merge_request must be a hash ref'
if
defined
(
$_
[2]) and
ref
(
$_
[2]) ne
'HASH'
;
my
$params
= (
@_
== 3) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'PUT'
,
'projects/:project_id/merge_requests/:merge_request_iid'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
delete_merge_request {
my
$self
=
shift
;
croak
'delete_merge_request must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to delete_merge_request must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($merge_request_iid) to delete_merge_request must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
$options
->{decode} = 0;
$self
->_call_rest_client(
'DELETE'
,
'projects/:project_id/merge_requests/:merge_request_iid'
, [
@_
],
$options
);
return
;
}
Hide Show 12 lines of Pod
sub
accept_merge_request {
my
$self
=
shift
;
croak
'accept_merge_request must be called with 2 to 3 arguments'
if
@_
< 2 or
@_
> 3;
croak
'The #1 argument ($project_id) to accept_merge_request must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($merge_request_iid) to accept_merge_request must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The last argument (\%params) to accept_merge_request must be a hash ref'
if
defined
(
$_
[2]) and
ref
(
$_
[2]) ne
'HASH'
;
my
$params
= (
@_
== 3) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'PUT'
,
'projects/:project_id/merge_requests/:merge_request_iid/merge'
, [
@_
],
$options
);
}
Hide Show 12 lines of Pod
sub
approve_merge_request {
my
$self
=
shift
;
croak
'approve_merge_request must be called with 2 to 3 arguments'
if
@_
< 2 or
@_
> 3;
croak
'The #1 argument ($project_id) to approve_merge_request must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($merge_request_iid) to approve_merge_request must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The last argument (\%params) to approve_merge_request must be a hash ref'
if
defined
(
$_
[2]) and
ref
(
$_
[2]) ne
'HASH'
;
my
$params
= (
@_
== 3) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'POST'
,
'projects/:project_id/merge_requests/:merge_request_iid/approve'
, [
@_
],
$options
);
}
Hide Show 12 lines of Pod
sub
unapprove_merge_request {
my
$self
=
shift
;
croak
'unapprove_merge_request must be called with 2 to 3 arguments'
if
@_
< 2 or
@_
> 3;
croak
'The #1 argument ($project_id) to unapprove_merge_request must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($merge_request_iid) to unapprove_merge_request must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The last argument (\%params) to unapprove_merge_request must be a hash ref'
if
defined
(
$_
[2]) and
ref
(
$_
[2]) ne
'HASH'
;
my
$params
= (
@_
== 3) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'POST'
,
'projects/:project_id/merge_requests/:merge_request_iid/unapprove'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
cancel_merge_when_pipeline_succeeds {
my
$self
=
shift
;
croak
'cancel_merge_when_pipeline_succeeds must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to cancel_merge_when_pipeline_succeeds must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($merge_request_iid) to cancel_merge_when_pipeline_succeeds must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
return
$self
->_call_rest_client(
'PUT'
,
'projects/:project_id/merge_requests/:merge_request_iid/cancel_merge_when_pipeline_succeeds'
, [
@_
],
$options
);
}
Hide Show 12 lines of Pod
sub
merge_request_closes_issues {
my
$self
=
shift
;
croak
'merge_request_closes_issues must be called with 2 to 3 arguments'
if
@_
< 2 or
@_
> 3;
croak
'The #1 argument ($project_id) to merge_request_closes_issues must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($merge_request_iid) to merge_request_closes_issues must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The last argument (\%params) to merge_request_closes_issues must be a hash ref'
if
defined
(
$_
[2]) and
ref
(
$_
[2]) ne
'HASH'
;
my
$params
= (
@_
== 3) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/merge_requests/:merge_request_iid/closes_issues'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
subscribe_to_merge_request {
my
$self
=
shift
;
croak
'subscribe_to_merge_request must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to subscribe_to_merge_request must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($merge_request_iid) to subscribe_to_merge_request must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
return
$self
->_call_rest_client(
'POST'
,
'projects/:project_id/merge_requests/:merge_request_iid/subscribe'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
unsubscribe_from_merge_request {
my
$self
=
shift
;
croak
'unsubscribe_from_merge_request must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to unsubscribe_from_merge_request must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($merge_request_iid) to unsubscribe_from_merge_request must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
return
$self
->_call_rest_client(
'POST'
,
'projects/:project_id/merge_requests/:merge_request_iid/unsubscribe'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
create_merge_request_todo {
my
$self
=
shift
;
croak
'create_merge_request_todo must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to create_merge_request_todo must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($merge_request_iid) to create_merge_request_todo must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
return
$self
->_call_rest_client(
'POST'
,
'projects/:project_id/merge_requests/:merge_request_iid/todo'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
merge_request_diff_versions {
my
$self
=
shift
;
croak
'merge_request_diff_versions must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to merge_request_diff_versions must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($merge_request_iid) to merge_request_diff_versions must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/merge_requests/:merge_request_iid/versions'
, [
@_
],
$options
);
}
Hide Show 12 lines of Pod
sub
merge_request_diff_version {
my
$self
=
shift
;
croak
'merge_request_diff_version must be called with 3 arguments'
if
@_
!= 3;
croak
'The #1 argument ($project_id) to merge_request_diff_version must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($merge_request_iid) to merge_request_diff_version must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The #3 argument ($version_id) to merge_request_diff_version must be a scalar'
if
ref
(
$_
[2]) or (!
defined
$_
[2]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/merge_requests/:merge_request_iid/versions/:version_id'
, [
@_
],
$options
);
}
Hide Show 12 lines of Pod
sub
set_merge_request_time_estimate {
my
$self
=
shift
;
croak
'set_merge_request_time_estimate must be called with 2 to 3 arguments'
if
@_
< 2 or
@_
> 3;
croak
'The #1 argument ($project_id) to set_merge_request_time_estimate must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($merge_request_iid) to set_merge_request_time_estimate must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The last argument (\%params) to set_merge_request_time_estimate must be a hash ref'
if
defined
(
$_
[2]) and
ref
(
$_
[2]) ne
'HASH'
;
my
$params
= (
@_
== 3) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'POST'
,
'projects/:project_id/merge_requests/:merge_request_iid/time_estimate'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
reset_merge_request_time_estimate {
my
$self
=
shift
;
croak
'reset_merge_request_time_estimate must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to reset_merge_request_time_estimate must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($merge_request_iid) to reset_merge_request_time_estimate must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
return
$self
->_call_rest_client(
'POST'
,
'projects/:project_id/merge_requests/:merge_request_iid/reset_time_estimate'
, [
@_
],
$options
);
}
Hide Show 12 lines of Pod
sub
add_merge_request_spent_time {
my
$self
=
shift
;
croak
'add_merge_request_spent_time must be called with 2 to 3 arguments'
if
@_
< 2 or
@_
> 3;
croak
'The #1 argument ($project_id) to add_merge_request_spent_time must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($merge_request_iid) to add_merge_request_spent_time must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The last argument (\%params) to add_merge_request_spent_time must be a hash ref'
if
defined
(
$_
[2]) and
ref
(
$_
[2]) ne
'HASH'
;
my
$params
= (
@_
== 3) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'POST'
,
'projects/:project_id/merge_requests/:merge_request_iid/add_spent_time'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
reset_merge_request_spent_time {
my
$self
=
shift
;
croak
'reset_merge_request_spent_time must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to reset_merge_request_spent_time must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($merge_request_iid) to reset_merge_request_spent_time must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
return
$self
->_call_rest_client(
'POST'
,
'projects/:project_id/merge_requests/:merge_request_iid/reset_spent_time'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
merge_request_time_stats {
my
$self
=
shift
;
croak
'merge_request_time_stats must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to merge_request_time_stats must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($merge_request_iid) to merge_request_time_stats must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/merge_requests/:merge_request_iid/time_stats'
, [
@_
],
$options
);
}
Hide Show 19 lines of Pod
sub
project_milestones {
my
$self
=
shift
;
croak
'project_milestones must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($project_id) to project_milestones must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to project_milestones must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/milestones'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
project_milestone {
my
$self
=
shift
;
croak
'project_milestone must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to project_milestone must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($milestone_id) to project_milestone must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/milestones/:milestone_id'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
create_project_milestone {
my
$self
=
shift
;
croak
'create_project_milestone must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($project_id) to create_project_milestone must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to create_project_milestone must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'POST'
,
'projects/:project_id/milestones'
, [
@_
],
$options
);
}
Hide Show 12 lines of Pod
sub
edit_project_milestone {
my
$self
=
shift
;
croak
'edit_project_milestone must be called with 2 to 3 arguments'
if
@_
< 2 or
@_
> 3;
croak
'The #1 argument ($project_id) to edit_project_milestone must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($milestone_id) to edit_project_milestone must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The last argument (\%params) to edit_project_milestone must be a hash ref'
if
defined
(
$_
[2]) and
ref
(
$_
[2]) ne
'HASH'
;
my
$params
= (
@_
== 3) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'PUT'
,
'projects/:project_id/milestones/:milestone_id'
, [
@_
],
$options
);
}
Hide Show 12 lines of Pod
sub
project_milestone_issues {
my
$self
=
shift
;
croak
'project_milestone_issues must be called with 2 to 3 arguments'
if
@_
< 2 or
@_
> 3;
croak
'The #1 argument ($project_id) to project_milestone_issues must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($milestone_id) to project_milestone_issues must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The last argument (\%params) to project_milestone_issues must be a hash ref'
if
defined
(
$_
[2]) and
ref
(
$_
[2]) ne
'HASH'
;
my
$params
= (
@_
== 3) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/milestones/:milestone_id/issues'
, [
@_
],
$options
);
}
Hide Show 12 lines of Pod
sub
project_milestone_merge_requests {
my
$self
=
shift
;
croak
'project_milestone_merge_requests must be called with 2 to 3 arguments'
if
@_
< 2 or
@_
> 3;
croak
'The #1 argument ($project_id) to project_milestone_merge_requests must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($milestone_id) to project_milestone_merge_requests must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The last argument (\%params) to project_milestone_merge_requests must be a hash ref'
if
defined
(
$_
[2]) and
ref
(
$_
[2]) ne
'HASH'
;
my
$params
= (
@_
== 3) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/milestones/:milestone_id/merge_requests'
, [
@_
],
$options
);
}
Hide Show 19 lines of Pod
sub
group_milestones {
my
$self
=
shift
;
croak
'group_milestones must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($group_id) to group_milestones must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to group_milestones must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'groups/:group_id/milestones'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
group_milestone {
my
$self
=
shift
;
croak
'group_milestone must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($group_id) to group_milestone must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($milestone_id) to group_milestone must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'groups/:group_id/milestones/:milestone_id'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
create_group_milestone {
my
$self
=
shift
;
croak
'create_group_milestone must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($group_id) to create_group_milestone must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to create_group_milestone must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'POST'
,
'groups/:group_id/milestones'
, [
@_
],
$options
);
}
Hide Show 12 lines of Pod
sub
edit_group_milestone {
my
$self
=
shift
;
croak
'edit_group_milestone must be called with 2 to 3 arguments'
if
@_
< 2 or
@_
> 3;
croak
'The #1 argument ($group_id) to edit_group_milestone must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($milestone_id) to edit_group_milestone must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The last argument (\%params) to edit_group_milestone must be a hash ref'
if
defined
(
$_
[2]) and
ref
(
$_
[2]) ne
'HASH'
;
my
$params
= (
@_
== 3) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'PUT'
,
'groups/:group_id/milestones/:milestone_id'
, [
@_
],
$options
);
}
Hide Show 12 lines of Pod
sub
group_milestone_issues {
my
$self
=
shift
;
croak
'group_milestone_issues must be called with 2 to 3 arguments'
if
@_
< 2 or
@_
> 3;
croak
'The #1 argument ($group_id) to group_milestone_issues must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($milestone_id) to group_milestone_issues must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The last argument (\%params) to group_milestone_issues must be a hash ref'
if
defined
(
$_
[2]) and
ref
(
$_
[2]) ne
'HASH'
;
my
$params
= (
@_
== 3) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'groups/:group_id/milestones/:milestone_id/issues'
, [
@_
],
$options
);
}
Hide Show 12 lines of Pod
sub
group_milestone_merge_requests {
my
$self
=
shift
;
croak
'group_milestone_merge_requests must be called with 2 to 3 arguments'
if
@_
< 2 or
@_
> 3;
croak
'The #1 argument ($group_id) to group_milestone_merge_requests must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($milestone_id) to group_milestone_merge_requests must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The last argument (\%params) to group_milestone_merge_requests must be a hash ref'
if
defined
(
$_
[2]) and
ref
(
$_
[2]) ne
'HASH'
;
my
$params
= (
@_
== 3) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'groups/:group_id/milestones/:milestone_id/merge_requests'
, [
@_
],
$options
);
}
Hide Show 18 lines of Pod
sub
namespaces {
my
$self
=
shift
;
croak
'namespaces must be called with 0 to 1 arguments'
if
@_
< 0 or
@_
> 1;
croak
'The last argument (\%params) to namespaces must be a hash ref'
if
defined
(
$_
[0]) and
ref
(
$_
[0]) ne
'HASH'
;
my
$params
= (
@_
== 1) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'namespaces'
, [
@_
],
$options
);
}
Hide Show 10 lines of Pod
sub
namespace {
my
$self
=
shift
;
croak
'namespace must be called with 1 arguments'
if
@_
!= 1;
croak
'The #1 argument ($namespace_id) to namespace must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'namespaces/:namespace_id'
, [
@_
],
$options
);
}
Hide Show 20 lines of Pod
sub
issue_notes {
my
$self
=
shift
;
croak
'issue_notes must be called with 2 to 3 arguments'
if
@_
< 2 or
@_
> 3;
croak
'The #1 argument ($project_id) to issue_notes must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($issue_iid) to issue_notes must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The last argument (\%params) to issue_notes must be a hash ref'
if
defined
(
$_
[2]) and
ref
(
$_
[2]) ne
'HASH'
;
my
$params
= (
@_
== 3) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/issues/:issue_iid/notes'
, [
@_
],
$options
);
}
Hide Show 12 lines of Pod
sub
issue_note {
my
$self
=
shift
;
croak
'issue_note must be called with 3 arguments'
if
@_
!= 3;
croak
'The #1 argument ($project_id) to issue_note must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($issue_iid) to issue_note must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The #3 argument ($note_id) to issue_note must be a scalar'
if
ref
(
$_
[2]) or (!
defined
$_
[2]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/issues/:issue_iid/notes/:note_id'
, [
@_
],
$options
);
}
Hide Show 12 lines of Pod
sub
create_issue_note {
my
$self
=
shift
;
croak
'create_issue_note must be called with 2 to 3 arguments'
if
@_
< 2 or
@_
> 3;
croak
'The #1 argument ($project_id) to create_issue_note must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($issue_iid) to create_issue_note must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The last argument (\%params) to create_issue_note must be a hash ref'
if
defined
(
$_
[2]) and
ref
(
$_
[2]) ne
'HASH'
;
my
$params
= (
@_
== 3) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'POST'
,
'projects/:project_id/issues/:issue_iid/notes'
, [
@_
],
$options
);
}
Hide Show 13 lines of Pod
sub
edit_issue_note {
my
$self
=
shift
;
croak
'edit_issue_note must be called with 3 to 4 arguments'
if
@_
< 3 or
@_
> 4;
croak
'The #1 argument ($project_id) to edit_issue_note must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($issue_iid) to edit_issue_note must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The #3 argument ($note_id) to edit_issue_note must be a scalar'
if
ref
(
$_
[2]) or (!
defined
$_
[2]);
croak
'The last argument (\%params) to edit_issue_note must be a hash ref'
if
defined
(
$_
[3]) and
ref
(
$_
[3]) ne
'HASH'
;
my
$params
= (
@_
== 4) ?
pop
() :
undef
;
my
$options
= {};
$options
->{decode} = 0;
$options
->{content} =
$params
if
defined
$params
;
$self
->_call_rest_client(
'PUT'
,
'projects/:project_id/issues/:issue_iid/notes/:note_id'
, [
@_
],
$options
);
return
;
}
Hide Show 12 lines of Pod
sub
delete_issue_note {
my
$self
=
shift
;
croak
'delete_issue_note must be called with 3 arguments'
if
@_
!= 3;
croak
'The #1 argument ($project_id) to delete_issue_note must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($issue_iid) to delete_issue_note must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The #3 argument ($note_id) to delete_issue_note must be a scalar'
if
ref
(
$_
[2]) or (!
defined
$_
[2]);
my
$options
= {};
$options
->{decode} = 0;
$self
->_call_rest_client(
'DELETE'
,
'projects/:project_id/issues/:issue_iid/notes/:note_id'
, [
@_
],
$options
);
return
;
}
Hide Show 12 lines of Pod
sub
snippet_notes {
my
$self
=
shift
;
croak
'snippet_notes must be called with 2 to 3 arguments'
if
@_
< 2 or
@_
> 3;
croak
'The #1 argument ($project_id) to snippet_notes must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($snippet_id) to snippet_notes must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The last argument (\%params) to snippet_notes must be a hash ref'
if
defined
(
$_
[2]) and
ref
(
$_
[2]) ne
'HASH'
;
my
$params
= (
@_
== 3) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/snippets/:snippet_id/notes'
, [
@_
],
$options
);
}
Hide Show 12 lines of Pod
sub
snippet_note {
my
$self
=
shift
;
croak
'snippet_note must be called with 3 arguments'
if
@_
!= 3;
croak
'The #1 argument ($project_id) to snippet_note must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($snippet_id) to snippet_note must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The #3 argument ($note_id) to snippet_note must be a scalar'
if
ref
(
$_
[2]) or (!
defined
$_
[2]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/snippets/:snippet_id/notes/:note_id'
, [
@_
],
$options
);
}
Hide Show 12 lines of Pod
sub
create_snippet_note {
my
$self
=
shift
;
croak
'create_snippet_note must be called with 2 to 3 arguments'
if
@_
< 2 or
@_
> 3;
croak
'The #1 argument ($project_id) to create_snippet_note must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($snippet_id) to create_snippet_note must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The last argument (\%params) to create_snippet_note must be a hash ref'
if
defined
(
$_
[2]) and
ref
(
$_
[2]) ne
'HASH'
;
my
$params
= (
@_
== 3) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'POST'
,
'projects/:project_id/snippets/:snippet_id/notes'
, [
@_
],
$options
);
}
Hide Show 13 lines of Pod
sub
edit_snippet_note {
my
$self
=
shift
;
croak
'edit_snippet_note must be called with 3 to 4 arguments'
if
@_
< 3 or
@_
> 4;
croak
'The #1 argument ($project_id) to edit_snippet_note must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($snippet_id) to edit_snippet_note must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The #3 argument ($note_id) to edit_snippet_note must be a scalar'
if
ref
(
$_
[2]) or (!
defined
$_
[2]);
croak
'The last argument (\%params) to edit_snippet_note must be a hash ref'
if
defined
(
$_
[3]) and
ref
(
$_
[3]) ne
'HASH'
;
my
$params
= (
@_
== 4) ?
pop
() :
undef
;
my
$options
= {};
$options
->{decode} = 0;
$options
->{content} =
$params
if
defined
$params
;
$self
->_call_rest_client(
'PUT'
,
'projects/:project_id/snippets/:snippet_id/notes/:note_id'
, [
@_
],
$options
);
return
;
}
Hide Show 12 lines of Pod
sub
delete_snippet_note {
my
$self
=
shift
;
croak
'delete_snippet_note must be called with 3 arguments'
if
@_
!= 3;
croak
'The #1 argument ($project_id) to delete_snippet_note must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($snippet_id) to delete_snippet_note must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The #3 argument ($note_id) to delete_snippet_note must be a scalar'
if
ref
(
$_
[2]) or (!
defined
$_
[2]);
my
$options
= {};
$options
->{decode} = 0;
$self
->_call_rest_client(
'DELETE'
,
'projects/:project_id/snippets/:snippet_id/notes/:note_id'
, [
@_
],
$options
);
return
;
}
Hide Show 12 lines of Pod
sub
merge_request_notes {
my
$self
=
shift
;
croak
'merge_request_notes must be called with 2 to 3 arguments'
if
@_
< 2 or
@_
> 3;
croak
'The #1 argument ($project_id) to merge_request_notes must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($merge_request_iid) to merge_request_notes must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The last argument (\%params) to merge_request_notes must be a hash ref'
if
defined
(
$_
[2]) and
ref
(
$_
[2]) ne
'HASH'
;
my
$params
= (
@_
== 3) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/merge_requests/:merge_request_iid/notes'
, [
@_
],
$options
);
}
Hide Show 12 lines of Pod
sub
merge_request_note {
my
$self
=
shift
;
croak
'merge_request_note must be called with 3 arguments'
if
@_
!= 3;
croak
'The #1 argument ($project_id) to merge_request_note must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($merge_request_iid) to merge_request_note must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The #3 argument ($note_id) to merge_request_note must be a scalar'
if
ref
(
$_
[2]) or (!
defined
$_
[2]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/merge_requests/:merge_request_iid/notes/:note_id'
, [
@_
],
$options
);
}
Hide Show 12 lines of Pod
sub
create_merge_request_note {
my
$self
=
shift
;
croak
'create_merge_request_note must be called with 2 to 3 arguments'
if
@_
< 2 or
@_
> 3;
croak
'The #1 argument ($project_id) to create_merge_request_note must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($merge_request_iid) to create_merge_request_note must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The last argument (\%params) to create_merge_request_note must be a hash ref'
if
defined
(
$_
[2]) and
ref
(
$_
[2]) ne
'HASH'
;
my
$params
= (
@_
== 3) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'POST'
,
'projects/:project_id/merge_requests/:merge_request_iid/notes'
, [
@_
],
$options
);
}
Hide Show 13 lines of Pod
sub
edit_merge_request_note {
my
$self
=
shift
;
croak
'edit_merge_request_note must be called with 3 to 4 arguments'
if
@_
< 3 or
@_
> 4;
croak
'The #1 argument ($project_id) to edit_merge_request_note must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($merge_request_iid) to edit_merge_request_note must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The #3 argument ($note_id) to edit_merge_request_note must be a scalar'
if
ref
(
$_
[2]) or (!
defined
$_
[2]);
croak
'The last argument (\%params) to edit_merge_request_note must be a hash ref'
if
defined
(
$_
[3]) and
ref
(
$_
[3]) ne
'HASH'
;
my
$params
= (
@_
== 4) ?
pop
() :
undef
;
my
$options
= {};
$options
->{decode} = 0;
$options
->{content} =
$params
if
defined
$params
;
$self
->_call_rest_client(
'PUT'
,
'projects/:project_id/merge_requests/:merge_request_iid/notes/:note_id'
, [
@_
],
$options
);
return
;
}
Hide Show 12 lines of Pod
sub
delete_merge_request_note {
my
$self
=
shift
;
croak
'delete_merge_request_note must be called with 3 arguments'
if
@_
!= 3;
croak
'The #1 argument ($project_id) to delete_merge_request_note must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($merge_request_iid) to delete_merge_request_note must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The #3 argument ($note_id) to delete_merge_request_note must be a scalar'
if
ref
(
$_
[2]) or (!
defined
$_
[2]);
my
$options
= {};
$options
->{decode} = 0;
$self
->_call_rest_client(
'DELETE'
,
'projects/:project_id/merge_requests/:merge_request_iid/notes/:note_id'
, [
@_
],
$options
);
return
;
}
Hide Show 20 lines of Pod
sub
issue_discussions {
my
$self
=
shift
;
croak
'issue_discussions must be called with 2 to 3 arguments'
if
@_
< 2 or
@_
> 3;
croak
'The #1 argument ($project_id) to issue_discussions must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($issue_iid) to issue_discussions must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The last argument (\%params) to issue_discussions must be a hash ref'
if
defined
(
$_
[2]) and
ref
(
$_
[2]) ne
'HASH'
;
my
$params
= (
@_
== 3) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/issues/:issue_iid/discussions'
, [
@_
],
$options
);
}
Hide Show 12 lines of Pod
sub
issue_discussion {
my
$self
=
shift
;
croak
'issue_discussion must be called with 3 arguments'
if
@_
!= 3;
croak
'The #1 argument ($project_id) to issue_discussion must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($issue_iid) to issue_discussion must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The #3 argument ($discussion_id) to issue_discussion must be a scalar'
if
ref
(
$_
[2]) or (!
defined
$_
[2]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/issues/:issue_iid/discussions/:discussion_id'
, [
@_
],
$options
);
}
Hide Show 12 lines of Pod
sub
create_issue_discussion {
my
$self
=
shift
;
croak
'create_issue_discussion must be called with 2 to 3 arguments'
if
@_
< 2 or
@_
> 3;
croak
'The #1 argument ($project_id) to create_issue_discussion must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($issue_iid) to create_issue_discussion must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The last argument (\%params) to create_issue_discussion must be a hash ref'
if
defined
(
$_
[2]) and
ref
(
$_
[2]) ne
'HASH'
;
my
$params
= (
@_
== 3) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'POST'
,
'projects/:project_id/issues/:issue_iid/discussions'
, [
@_
],
$options
);
}
Hide Show 13 lines of Pod
sub
create_issue_discussion_note {
my
$self
=
shift
;
croak
'create_issue_discussion_note must be called with 3 to 4 arguments'
if
@_
< 3 or
@_
> 4;
croak
'The #1 argument ($project_id) to create_issue_discussion_note must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($issue_iid) to create_issue_discussion_note must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The #3 argument ($discussion_id) to create_issue_discussion_note must be a scalar'
if
ref
(
$_
[2]) or (!
defined
$_
[2]);
croak
'The last argument (\%params) to create_issue_discussion_note must be a hash ref'
if
defined
(
$_
[3]) and
ref
(
$_
[3]) ne
'HASH'
;
my
$params
= (
@_
== 4) ?
pop
() :
undef
;
my
$options
= {};
$options
->{decode} = 0;
$options
->{content} =
$params
if
defined
$params
;
$self
->_call_rest_client(
'POST'
,
'projects/:project_id/issues/:issue_iid/discussions/:discussion_id/notes'
, [
@_
],
$options
);
return
;
}
Hide Show 14 lines of Pod
sub
edit_issue_discussion_note {
my
$self
=
shift
;
croak
'edit_issue_discussion_note must be called with 4 to 5 arguments'
if
@_
< 4 or
@_
> 5;
croak
'The #1 argument ($project_id) to edit_issue_discussion_note must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($issue_iid) to edit_issue_discussion_note must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The #3 argument ($discussion_id) to edit_issue_discussion_note must be a scalar'
if
ref
(
$_
[2]) or (!
defined
$_
[2]);
croak
'The #4 argument ($note_id) to edit_issue_discussion_note must be a scalar'
if
ref
(
$_
[3]) or (!
defined
$_
[3]);
croak
'The last argument (\%params) to edit_issue_discussion_note must be a hash ref'
if
defined
(
$_
[4]) and
ref
(
$_
[4]) ne
'HASH'
;
my
$params
= (
@_
== 5) ?
pop
() :
undef
;
my
$options
= {};
$options
->{decode} = 0;
$options
->{content} =
$params
if
defined
$params
;
$self
->_call_rest_client(
'PUT'
,
'projects/:project_id/issues/:issue_iid/discussions/:discussion_id/notes/:note_id'
, [
@_
],
$options
);
return
;
}
Hide Show 13 lines of Pod
sub
delete_issue_discussion_note {
my
$self
=
shift
;
croak
'delete_issue_discussion_note must be called with 4 arguments'
if
@_
!= 4;
croak
'The #1 argument ($project_id) to delete_issue_discussion_note must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($issue_iid) to delete_issue_discussion_note must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The #3 argument ($discussion_id) to delete_issue_discussion_note must be a scalar'
if
ref
(
$_
[2]) or (!
defined
$_
[2]);
croak
'The #4 argument ($note_id) to delete_issue_discussion_note must be a scalar'
if
ref
(
$_
[3]) or (!
defined
$_
[3]);
my
$options
= {};
$options
->{decode} = 0;
$self
->_call_rest_client(
'DELETE'
,
'projects/:project_id/issues/:issue_iid/discussions/:discussion_id/notes/:note_id'
, [
@_
],
$options
);
return
;
}
Hide Show 12 lines of Pod
sub
project_snippet_discussions {
my
$self
=
shift
;
croak
'project_snippet_discussions must be called with 2 to 3 arguments'
if
@_
< 2 or
@_
> 3;
croak
'The #1 argument ($project_id) to project_snippet_discussions must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($snippet_id) to project_snippet_discussions must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The last argument (\%params) to project_snippet_discussions must be a hash ref'
if
defined
(
$_
[2]) and
ref
(
$_
[2]) ne
'HASH'
;
my
$params
= (
@_
== 3) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/snippets/:snippet_id/discussions'
, [
@_
],
$options
);
}
Hide Show 12 lines of Pod
sub
project_snippet_discussion {
my
$self
=
shift
;
croak
'project_snippet_discussion must be called with 3 arguments'
if
@_
!= 3;
croak
'The #1 argument ($project_id) to project_snippet_discussion must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($snippet_id) to project_snippet_discussion must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The #3 argument ($discussion_id) to project_snippet_discussion must be a scalar'
if
ref
(
$_
[2]) or (!
defined
$_
[2]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/snippets/:snippet_id/discussions/:discussion_id'
, [
@_
],
$options
);
}
Hide Show 12 lines of Pod
sub
create_project_snippet_discussion {
my
$self
=
shift
;
croak
'create_project_snippet_discussion must be called with 2 to 3 arguments'
if
@_
< 2 or
@_
> 3;
croak
'The #1 argument ($project_id) to create_project_snippet_discussion must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($snippet_id) to create_project_snippet_discussion must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The last argument (\%params) to create_project_snippet_discussion must be a hash ref'
if
defined
(
$_
[2]) and
ref
(
$_
[2]) ne
'HASH'
;
my
$params
= (
@_
== 3) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'POST'
,
'projects/:project_id/snippets/:snippet_id/discussions'
, [
@_
],
$options
);
}
Hide Show 13 lines of Pod
sub
create_project_snippet_discussion_note {
my
$self
=
shift
;
croak
'create_project_snippet_discussion_note must be called with 3 to 4 arguments'
if
@_
< 3 or
@_
> 4;
croak
'The #1 argument ($project_id) to create_project_snippet_discussion_note must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($snippet_id) to create_project_snippet_discussion_note must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The #3 argument ($discussion_id) to create_project_snippet_discussion_note must be a scalar'
if
ref
(
$_
[2]) or (!
defined
$_
[2]);
croak
'The last argument (\%params) to create_project_snippet_discussion_note must be a hash ref'
if
defined
(
$_
[3]) and
ref
(
$_
[3]) ne
'HASH'
;
my
$params
= (
@_
== 4) ?
pop
() :
undef
;
my
$options
= {};
$options
->{decode} = 0;
$options
->{content} =
$params
if
defined
$params
;
$self
->_call_rest_client(
'POST'
,
'projects/:project_id/snippets/:snippet_id/discussions/:discussion_id/notes'
, [
@_
],
$options
);
return
;
}
Hide Show 14 lines of Pod
sub
edit_project_snippet_discussion_note {
my
$self
=
shift
;
croak
'edit_project_snippet_discussion_note must be called with 4 to 5 arguments'
if
@_
< 4 or
@_
> 5;
croak
'The #1 argument ($project_id) to edit_project_snippet_discussion_note must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($snippet_id) to edit_project_snippet_discussion_note must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The #3 argument ($discussion_id) to edit_project_snippet_discussion_note must be a scalar'
if
ref
(
$_
[2]) or (!
defined
$_
[2]);
croak
'The #4 argument ($note_id) to edit_project_snippet_discussion_note must be a scalar'
if
ref
(
$_
[3]) or (!
defined
$_
[3]);
croak
'The last argument (\%params) to edit_project_snippet_discussion_note must be a hash ref'
if
defined
(
$_
[4]) and
ref
(
$_
[4]) ne
'HASH'
;
my
$params
= (
@_
== 5) ?
pop
() :
undef
;
my
$options
= {};
$options
->{decode} = 0;
$options
->{content} =
$params
if
defined
$params
;
$self
->_call_rest_client(
'PUT'
,
'projects/:project_id/snippets/:snippet_id/discussions/:discussion_id/notes/:note_id'
, [
@_
],
$options
);
return
;
}
Hide Show 13 lines of Pod
sub
delete_project_snippet_discussion_note {
my
$self
=
shift
;
croak
'delete_project_snippet_discussion_note must be called with 4 arguments'
if
@_
!= 4;
croak
'The #1 argument ($project_id) to delete_project_snippet_discussion_note must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($snippet_id) to delete_project_snippet_discussion_note must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The #3 argument ($discussion_id) to delete_project_snippet_discussion_note must be a scalar'
if
ref
(
$_
[2]) or (!
defined
$_
[2]);
croak
'The #4 argument ($note_id) to delete_project_snippet_discussion_note must be a scalar'
if
ref
(
$_
[3]) or (!
defined
$_
[3]);
my
$options
= {};
$options
->{decode} = 0;
$self
->_call_rest_client(
'DELETE'
,
'projects/:project_id/snippets/:snippet_id/discussions/:discussion_id/notes/:note_id'
, [
@_
],
$options
);
return
;
}
Hide Show 12 lines of Pod
sub
merge_request_discussions {
my
$self
=
shift
;
croak
'merge_request_discussions must be called with 2 to 3 arguments'
if
@_
< 2 or
@_
> 3;
croak
'The #1 argument ($project_id) to merge_request_discussions must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($merge_request_iid) to merge_request_discussions must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The last argument (\%params) to merge_request_discussions must be a hash ref'
if
defined
(
$_
[2]) and
ref
(
$_
[2]) ne
'HASH'
;
my
$params
= (
@_
== 3) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/merge_requests/:merge_request_iid/discussions'
, [
@_
],
$options
);
}
Hide Show 12 lines of Pod
sub
merge_request_discussion {
my
$self
=
shift
;
croak
'merge_request_discussion must be called with 3 arguments'
if
@_
!= 3;
croak
'The #1 argument ($project_id) to merge_request_discussion must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($merge_request_iid) to merge_request_discussion must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The #3 argument ($discussion_id) to merge_request_discussion must be a scalar'
if
ref
(
$_
[2]) or (!
defined
$_
[2]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/merge_requests/:merge_request_iid/discussions/:discussion_id'
, [
@_
],
$options
);
}
Hide Show 12 lines of Pod
sub
create_merge_request_discussion {
my
$self
=
shift
;
croak
'create_merge_request_discussion must be called with 2 to 3 arguments'
if
@_
< 2 or
@_
> 3;
croak
'The #1 argument ($project_id) to create_merge_request_discussion must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($merge_request_iid) to create_merge_request_discussion must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The last argument (\%params) to create_merge_request_discussion must be a hash ref'
if
defined
(
$_
[2]) and
ref
(
$_
[2]) ne
'HASH'
;
my
$params
= (
@_
== 3) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'POST'
,
'projects/:project_id/merge_requests/:merge_request_iid/discussions'
, [
@_
],
$options
);
}
Hide Show 13 lines of Pod
sub
resolve_merge_request_discussion {
my
$self
=
shift
;
croak
'resolve_merge_request_discussion must be called with 3 to 4 arguments'
if
@_
< 3 or
@_
> 4;
croak
'The #1 argument ($project_id) to resolve_merge_request_discussion must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($merge_request_iid) to resolve_merge_request_discussion must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The #3 argument ($discussion_id) to resolve_merge_request_discussion must be a scalar'
if
ref
(
$_
[2]) or (!
defined
$_
[2]);
croak
'The last argument (\%params) to resolve_merge_request_discussion must be a hash ref'
if
defined
(
$_
[3]) and
ref
(
$_
[3]) ne
'HASH'
;
my
$params
= (
@_
== 4) ?
pop
() :
undef
;
my
$options
= {};
$options
->{decode} = 0;
$options
->{content} =
$params
if
defined
$params
;
$self
->_call_rest_client(
'PUT'
,
'projects/:project_id/merge_requests/:merge_request_iid/discussions/:discussion_id'
, [
@_
],
$options
);
return
;
}
Hide Show 13 lines of Pod
sub
create_merge_request_discussion_note {
my
$self
=
shift
;
croak
'create_merge_request_discussion_note must be called with 3 to 4 arguments'
if
@_
< 3 or
@_
> 4;
croak
'The #1 argument ($project_id) to create_merge_request_discussion_note must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($merge_request_iid) to create_merge_request_discussion_note must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The #3 argument ($discussion_id) to create_merge_request_discussion_note must be a scalar'
if
ref
(
$_
[2]) or (!
defined
$_
[2]);
croak
'The last argument (\%params) to create_merge_request_discussion_note must be a hash ref'
if
defined
(
$_
[3]) and
ref
(
$_
[3]) ne
'HASH'
;
my
$params
= (
@_
== 4) ?
pop
() :
undef
;
my
$options
= {};
$options
->{decode} = 0;
$options
->{content} =
$params
if
defined
$params
;
$self
->_call_rest_client(
'POST'
,
'projects/:project_id/merge_requests/:merge_request_iid/discussions/:discussion_id/notes'
, [
@_
],
$options
);
return
;
}
Hide Show 14 lines of Pod
sub
edit_merge_request_discussion_note {
my
$self
=
shift
;
croak
'edit_merge_request_discussion_note must be called with 4 to 5 arguments'
if
@_
< 4 or
@_
> 5;
croak
'The #1 argument ($project_id) to edit_merge_request_discussion_note must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($merge_request_iid) to edit_merge_request_discussion_note must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The #3 argument ($discussion_id) to edit_merge_request_discussion_note must be a scalar'
if
ref
(
$_
[2]) or (!
defined
$_
[2]);
croak
'The #4 argument ($note_id) to edit_merge_request_discussion_note must be a scalar'
if
ref
(
$_
[3]) or (!
defined
$_
[3]);
croak
'The last argument (\%params) to edit_merge_request_discussion_note must be a hash ref'
if
defined
(
$_
[4]) and
ref
(
$_
[4]) ne
'HASH'
;
my
$params
= (
@_
== 5) ?
pop
() :
undef
;
my
$options
= {};
$options
->{decode} = 0;
$options
->{content} =
$params
if
defined
$params
;
$self
->_call_rest_client(
'PUT'
,
'projects/:project_id/merge_requests/:merge_request_iid/discussions/:discussion_id/notes/:note_id'
, [
@_
],
$options
);
return
;
}
Hide Show 13 lines of Pod
sub
delete_merge_request_discussion_note {
my
$self
=
shift
;
croak
'delete_merge_request_discussion_note must be called with 4 arguments'
if
@_
!= 4;
croak
'The #1 argument ($project_id) to delete_merge_request_discussion_note must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($merge_request_iid) to delete_merge_request_discussion_note must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The #3 argument ($discussion_id) to delete_merge_request_discussion_note must be a scalar'
if
ref
(
$_
[2]) or (!
defined
$_
[2]);
croak
'The #4 argument ($note_id) to delete_merge_request_discussion_note must be a scalar'
if
ref
(
$_
[3]) or (!
defined
$_
[3]);
my
$options
= {};
$options
->{decode} = 0;
$self
->_call_rest_client(
'DELETE'
,
'projects/:project_id/merge_requests/:merge_request_iid/discussions/:discussion_id/notes/:note_id'
, [
@_
],
$options
);
return
;
}
Hide Show 12 lines of Pod
sub
commit_discussions {
my
$self
=
shift
;
croak
'commit_discussions must be called with 2 to 3 arguments'
if
@_
< 2 or
@_
> 3;
croak
'The #1 argument ($project_id) to commit_discussions must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($commit_id) to commit_discussions must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The last argument (\%params) to commit_discussions must be a hash ref'
if
defined
(
$_
[2]) and
ref
(
$_
[2]) ne
'HASH'
;
my
$params
= (
@_
== 3) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/commits/:commit_id/discussions'
, [
@_
],
$options
);
}
Hide Show 12 lines of Pod
sub
commit_discussion {
my
$self
=
shift
;
croak
'commit_discussion must be called with 3 arguments'
if
@_
!= 3;
croak
'The #1 argument ($project_id) to commit_discussion must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($commit_id) to commit_discussion must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The #3 argument ($discussion_id) to commit_discussion must be a scalar'
if
ref
(
$_
[2]) or (!
defined
$_
[2]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/commits/:commit_id/discussions/:discussion_id'
, [
@_
],
$options
);
}
Hide Show 12 lines of Pod
sub
create_commit_discussion {
my
$self
=
shift
;
croak
'create_commit_discussion must be called with 2 to 3 arguments'
if
@_
< 2 or
@_
> 3;
croak
'The #1 argument ($project_id) to create_commit_discussion must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($commit_id) to create_commit_discussion must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The last argument (\%params) to create_commit_discussion must be a hash ref'
if
defined
(
$_
[2]) and
ref
(
$_
[2]) ne
'HASH'
;
my
$params
= (
@_
== 3) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'POST'
,
'projects/:project_id/commits/:commit_id/discussions'
, [
@_
],
$options
);
}
Hide Show 13 lines of Pod
sub
create_commit_discussion_note {
my
$self
=
shift
;
croak
'create_commit_discussion_note must be called with 3 to 4 arguments'
if
@_
< 3 or
@_
> 4;
croak
'The #1 argument ($project_id) to create_commit_discussion_note must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($commit_id) to create_commit_discussion_note must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The #3 argument ($discussion_id) to create_commit_discussion_note must be a scalar'
if
ref
(
$_
[2]) or (!
defined
$_
[2]);
croak
'The last argument (\%params) to create_commit_discussion_note must be a hash ref'
if
defined
(
$_
[3]) and
ref
(
$_
[3]) ne
'HASH'
;
my
$params
= (
@_
== 4) ?
pop
() :
undef
;
my
$options
= {};
$options
->{decode} = 0;
$options
->{content} =
$params
if
defined
$params
;
$self
->_call_rest_client(
'POST'
,
'projects/:project_id/commits/:commit_id/discussions/:discussion_id/notes'
, [
@_
],
$options
);
return
;
}
Hide Show 14 lines of Pod
sub
edit_commit_discussion_note {
my
$self
=
shift
;
croak
'edit_commit_discussion_note must be called with 4 to 5 arguments'
if
@_
< 4 or
@_
> 5;
croak
'The #1 argument ($project_id) to edit_commit_discussion_note must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($commit_id) to edit_commit_discussion_note must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The #3 argument ($discussion_id) to edit_commit_discussion_note must be a scalar'
if
ref
(
$_
[2]) or (!
defined
$_
[2]);
croak
'The #4 argument ($note_id) to edit_commit_discussion_note must be a scalar'
if
ref
(
$_
[3]) or (!
defined
$_
[3]);
croak
'The last argument (\%params) to edit_commit_discussion_note must be a hash ref'
if
defined
(
$_
[4]) and
ref
(
$_
[4]) ne
'HASH'
;
my
$params
= (
@_
== 5) ?
pop
() :
undef
;
my
$options
= {};
$options
->{decode} = 0;
$options
->{content} =
$params
if
defined
$params
;
$self
->_call_rest_client(
'PUT'
,
'projects/:project_id/commits/:commit_id/discussions/:discussion_id/notes/:note_id'
, [
@_
],
$options
);
return
;
}
Hide Show 13 lines of Pod
sub
delete_commit_discussion_note {
my
$self
=
shift
;
croak
'delete_commit_discussion_note must be called with 4 arguments'
if
@_
!= 4;
croak
'The #1 argument ($project_id) to delete_commit_discussion_note must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($commit_id) to delete_commit_discussion_note must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The #3 argument ($discussion_id) to delete_commit_discussion_note must be a scalar'
if
ref
(
$_
[2]) or (!
defined
$_
[2]);
croak
'The #4 argument ($note_id) to delete_commit_discussion_note must be a scalar'
if
ref
(
$_
[3]) or (!
defined
$_
[3]);
my
$options
= {};
$options
->{decode} = 0;
$self
->_call_rest_client(
'DELETE'
,
'projects/:project_id/commits/:commit_id/discussions/:discussion_id/notes/:note_id'
, [
@_
],
$options
);
return
;
}
Hide Show 19 lines of Pod
sub
issue_resource_label_events {
my
$self
=
shift
;
croak
'issue_resource_label_events must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to issue_resource_label_events must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($issue_iid) to issue_resource_label_events must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/issues/:issue_iid/resource_label_events'
, [
@_
],
$options
);
}
Hide Show 12 lines of Pod
sub
issue_resource_label_event {
my
$self
=
shift
;
croak
'issue_resource_label_event must be called with 3 arguments'
if
@_
!= 3;
croak
'The #1 argument ($project_id) to issue_resource_label_event must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($issue_iid) to issue_resource_label_event must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The #3 argument ($resource_label_event_id) to issue_resource_label_event must be a scalar'
if
ref
(
$_
[2]) or (!
defined
$_
[2]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/issues/:issue_iid/resource_label_events/:resource_label_event_id'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
merge_request_resource_label_events {
my
$self
=
shift
;
croak
'merge_request_resource_label_events must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to merge_request_resource_label_events must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($merge_request_iid) to merge_request_resource_label_events must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/merge_requests/:merge_request_iid/resource_label_events'
, [
@_
],
$options
);
}
Hide Show 12 lines of Pod
sub
merge_request_resource_label_event {
my
$self
=
shift
;
croak
'merge_request_resource_label_event must be called with 3 arguments'
if
@_
!= 3;
croak
'The #1 argument ($project_id) to merge_request_resource_label_event must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($merge_request_iid) to merge_request_resource_label_event must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The #3 argument ($resource_label_event_id) to merge_request_resource_label_event must be a scalar'
if
ref
(
$_
[2]) or (!
defined
$_
[2]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/merge_requests/:merge_request_iid/resource_label_events/:resource_label_event_id'
, [
@_
],
$options
);
}
Hide Show 16 lines of Pod
sub
global_notification_settings {
my
$self
=
shift
;
croak
"The global_notification_settings method does not take any arguments"
if
@_
;
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'notification_settings'
, [
@_
],
$options
);
}
Hide Show 10 lines of Pod
sub
set_global_notification_settings {
my
$self
=
shift
;
croak
'set_global_notification_settings must be called with 0 to 1 arguments'
if
@_
< 0 or
@_
> 1;
croak
'The last argument (\%params) to set_global_notification_settings must be a hash ref'
if
defined
(
$_
[0]) and
ref
(
$_
[0]) ne
'HASH'
;
my
$params
= (
@_
== 1) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'PUT'
,
'notification_settings'
, [
@_
],
$options
);
}
Hide Show 10 lines of Pod
sub
group_notification_settings {
my
$self
=
shift
;
croak
'group_notification_settings must be called with 1 arguments'
if
@_
!= 1;
croak
'The #1 argument ($group_id) to group_notification_settings must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'groups/:group_id/notification_settings'
, [
@_
],
$options
);
}
Hide Show 10 lines of Pod
sub
project_notification_settings {
my
$self
=
shift
;
croak
'project_notification_settings must be called with 1 arguments'
if
@_
!= 1;
croak
'The #1 argument ($project_id) to project_notification_settings must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/notification_settings'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
set_group_notification_settings {
my
$self
=
shift
;
croak
'set_group_notification_settings must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($group_id) to set_group_notification_settings must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to set_group_notification_settings must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'PUT'
,
'groups/:group_id/notification_settings'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
set_project_notification_settings {
my
$self
=
shift
;
croak
'set_project_notification_settings must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($project_id) to set_project_notification_settings must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to set_project_notification_settings must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'PUT'
,
'projects/:project_id/notification_settings'
, [
@_
],
$options
);
}
Hide Show 18 lines of Pod
sub
license_templates {
my
$self
=
shift
;
croak
'license_templates must be called with 0 to 1 arguments'
if
@_
< 0 or
@_
> 1;
croak
'The last argument (\%params) to license_templates must be a hash ref'
if
defined
(
$_
[0]) and
ref
(
$_
[0]) ne
'HASH'
;
my
$params
= (
@_
== 1) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'templates/licenses'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
license_template {
my
$self
=
shift
;
croak
'license_template must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($template_key) to license_template must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to license_template must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'templates/licenses/:template_key'
, [
@_
],
$options
);
}
Hide Show 18 lines of Pod
sub
global_pages_domains {
my
$self
=
shift
;
croak
'global_pages_domains must be called with 0 to 1 arguments'
if
@_
< 0 or
@_
> 1;
croak
'The last argument (\%params) to global_pages_domains must be a hash ref'
if
defined
(
$_
[0]) and
ref
(
$_
[0]) ne
'HASH'
;
my
$params
= (
@_
== 1) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'pages/domains'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
pages_domains {
my
$self
=
shift
;
croak
'pages_domains must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($project_id) to pages_domains must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to pages_domains must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/pages/domains'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
pages_domain {
my
$self
=
shift
;
croak
'pages_domain must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to pages_domain must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($domain) to pages_domain must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/pages/domains/:domain'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
create_pages_domain {
my
$self
=
shift
;
croak
'create_pages_domain must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($project_id) to create_pages_domain must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to create_pages_domain must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'POST'
,
'projects/:project_id/pages/domains'
, [
@_
],
$options
);
}
Hide Show 12 lines of Pod
sub
edit_pages_domain {
my
$self
=
shift
;
croak
'edit_pages_domain must be called with 2 to 3 arguments'
if
@_
< 2 or
@_
> 3;
croak
'The #1 argument ($project_id) to edit_pages_domain must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($domain) to edit_pages_domain must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The last argument (\%params) to edit_pages_domain must be a hash ref'
if
defined
(
$_
[2]) and
ref
(
$_
[2]) ne
'HASH'
;
my
$params
= (
@_
== 3) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'PUT'
,
'projects/:project_id/pages/domains/:domain'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
delete_pages_domain {
my
$self
=
shift
;
croak
'delete_pages_domain must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to delete_pages_domain must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($domain) to delete_pages_domain must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
$options
->{decode} = 0;
$self
->_call_rest_client(
'DELETE'
,
'projects/:project_id/pages/domains/:domain'
, [
@_
],
$options
);
return
;
}
Hide Show 19 lines of Pod
sub
pipelines {
my
$self
=
shift
;
croak
'pipelines must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($project_id) to pipelines must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to pipelines must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/pipelines'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
pipeline {
my
$self
=
shift
;
croak
'pipeline must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to pipeline must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($pipeline_id) to pipeline must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/pipelines/:pipeline_id'
, [
@_
],
$options
);
}
Hide Show 26 lines of Pod
sub
create_pipeline {
my
$self
=
shift
;
croak
'create_pipeline must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($project_id) to create_pipeline must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to create_pipeline must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'POST'
,
'projects/:project_id/pipeline'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
retry_pipeline_jobs {
my
$self
=
shift
;
croak
'retry_pipeline_jobs must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to retry_pipeline_jobs must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($pipeline_id) to retry_pipeline_jobs must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
return
$self
->_call_rest_client(
'POST'
,
'projects/:project_id/pipelines/:pipeline_id/retry'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
cancel_pipeline_jobs {
my
$self
=
shift
;
croak
'cancel_pipeline_jobs must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to cancel_pipeline_jobs must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($pipeline_id) to cancel_pipeline_jobs must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
return
$self
->_call_rest_client(
'POST'
,
'projects/:project_id/pipelines/:pipeline_id/cancel'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
delete_pipeline {
my
$self
=
shift
;
croak
'delete_pipeline must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to delete_pipeline must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($pipeline_id) to delete_pipeline must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
$options
->{decode} = 0;
$self
->_call_rest_client(
'DELETE'
,
'projects/:project_id/pipelines/:pipeline_id'
, [
@_
],
$options
);
return
;
}
Hide Show 19 lines of Pod
sub
triggers {
my
$self
=
shift
;
croak
'triggers must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($project_id) to triggers must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to triggers must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/triggers'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
trigger {
my
$self
=
shift
;
croak
'trigger must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to trigger must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($trigger_id) to trigger must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/triggers/:trigger_id'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
create_trigger {
my
$self
=
shift
;
croak
'create_trigger must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($project_id) to create_trigger must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to create_trigger must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'POST'
,
'projects/:project_id/triggers'
, [
@_
],
$options
);
}
Hide Show 12 lines of Pod
sub
edit_trigger {
my
$self
=
shift
;
croak
'edit_trigger must be called with 2 to 3 arguments'
if
@_
< 2 or
@_
> 3;
croak
'The #1 argument ($project_id) to edit_trigger must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($trigger_id) to edit_trigger must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The last argument (\%params) to edit_trigger must be a hash ref'
if
defined
(
$_
[2]) and
ref
(
$_
[2]) ne
'HASH'
;
my
$params
= (
@_
== 3) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'PUT'
,
'projects/:project_id/triggers/:trigger_id'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
take_ownership_of_trigger {
my
$self
=
shift
;
croak
'take_ownership_of_trigger must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to take_ownership_of_trigger must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($trigger_id) to take_ownership_of_trigger must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
return
$self
->_call_rest_client(
'POST'
,
'projects/:project_id/triggers/:trigger_id/take_ownership'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
delete_trigger {
my
$self
=
shift
;
croak
'delete_trigger must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to delete_trigger must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($trigger_id) to delete_trigger must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
$options
->{decode} = 0;
$self
->_call_rest_client(
'DELETE'
,
'projects/:project_id/triggers/:trigger_id'
, [
@_
],
$options
);
return
;
}
Hide Show 31 lines of Pod
sub
trigger_pipeline {
my
$self
=
shift
;
croak
'trigger_pipeline must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($project_id) to trigger_pipeline must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to trigger_pipeline must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'POST'
,
'projects/:project_id/trigger/pipeline'
, [
@_
],
$options
);
}
Hide Show 19 lines of Pod
sub
pipeline_schedules {
my
$self
=
shift
;
croak
'pipeline_schedules must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($project_id) to pipeline_schedules must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to pipeline_schedules must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/pipeline_schedules'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
pipeline_schedule {
my
$self
=
shift
;
croak
'pipeline_schedule must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to pipeline_schedule must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($pipeline_schedule_id) to pipeline_schedule must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/pipeline_schedules/:pipeline_schedule_id'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
create_pipeline_schedule {
my
$self
=
shift
;
croak
'create_pipeline_schedule must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($project_id) to create_pipeline_schedule must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to create_pipeline_schedule must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'POST'
,
'projects/:project_id/pipeline_schedules'
, [
@_
],
$options
);
}
Hide Show 12 lines of Pod
sub
edit_pipeline_schedule {
my
$self
=
shift
;
croak
'edit_pipeline_schedule must be called with 2 to 3 arguments'
if
@_
< 2 or
@_
> 3;
croak
'The #1 argument ($project_id) to edit_pipeline_schedule must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($pipeline_schedule_id) to edit_pipeline_schedule must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The last argument (\%params) to edit_pipeline_schedule must be a hash ref'
if
defined
(
$_
[2]) and
ref
(
$_
[2]) ne
'HASH'
;
my
$params
= (
@_
== 3) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'PUT'
,
'projects/:project_id/pipeline_schedules/:pipeline_schedule_id'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
take_ownership_of_pipeline_schedule {
my
$self
=
shift
;
croak
'take_ownership_of_pipeline_schedule must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to take_ownership_of_pipeline_schedule must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($pipeline_schedule_id) to take_ownership_of_pipeline_schedule must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
return
$self
->_call_rest_client(
'POST'
,
'projects/:project_id/pipeline_schedules/:pipeline_schedule_id/take_ownership'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
run_pipeline_schedule {
my
$self
=
shift
;
croak
'run_pipeline_schedule must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to run_pipeline_schedule must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($pipeline_schedule_id) to run_pipeline_schedule must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
return
$self
->_call_rest_client(
'POST'
,
'projects/:project_id/pipeline_schedules/:pipeline_schedule_id/play'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
delete_pipeline_schedule {
my
$self
=
shift
;
croak
'delete_pipeline_schedule must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to delete_pipeline_schedule must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($pipeline_schedule_id) to delete_pipeline_schedule must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
return
$self
->_call_rest_client(
'DELETE'
,
'projects/:project_id/pipeline_schedules/:pipeline_schedule_id'
, [
@_
],
$options
);
}
Hide Show 12 lines of Pod
sub
create_pipeline_schedule_variable {
my
$self
=
shift
;
croak
'create_pipeline_schedule_variable must be called with 2 to 3 arguments'
if
@_
< 2 or
@_
> 3;
croak
'The #1 argument ($project_id) to create_pipeline_schedule_variable must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($pipeline_schedule_id) to create_pipeline_schedule_variable must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The last argument (\%params) to create_pipeline_schedule_variable must be a hash ref'
if
defined
(
$_
[2]) and
ref
(
$_
[2]) ne
'HASH'
;
my
$params
= (
@_
== 3) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'POST'
,
'projects/:project_id/pipeline_schedules/:pipeline_schedule_id/variables'
, [
@_
],
$options
);
}
Hide Show 13 lines of Pod
sub
edit_pipeline_schedule_variable {
my
$self
=
shift
;
croak
'edit_pipeline_schedule_variable must be called with 3 to 4 arguments'
if
@_
< 3 or
@_
> 4;
croak
'The #1 argument ($project_id) to edit_pipeline_schedule_variable must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($pipeline_schedule_id) to edit_pipeline_schedule_variable must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The #3 argument ($variable_key) to edit_pipeline_schedule_variable must be a scalar'
if
ref
(
$_
[2]) or (!
defined
$_
[2]);
croak
'The last argument (\%params) to edit_pipeline_schedule_variable must be a hash ref'
if
defined
(
$_
[3]) and
ref
(
$_
[3]) ne
'HASH'
;
my
$params
= (
@_
== 4) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'PUT'
,
'projects/:project_id/pipeline_schedules/:pipeline_schedule_id/variables/:variable_key'
, [
@_
],
$options
);
}
Hide Show 12 lines of Pod
sub
delete_pipeline_schedule_variable {
my
$self
=
shift
;
croak
'delete_pipeline_schedule_variable must be called with 3 arguments'
if
@_
!= 3;
croak
'The #1 argument ($project_id) to delete_pipeline_schedule_variable must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($pipeline_schedule_id) to delete_pipeline_schedule_variable must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The #3 argument ($variable_key) to delete_pipeline_schedule_variable must be a scalar'
if
ref
(
$_
[2]) or (!
defined
$_
[2]);
my
$options
= {};
return
$self
->_call_rest_client(
'DELETE'
,
'projects/:project_id/pipeline_schedules/:pipeline_schedule_id/variables/:variable_key'
, [
@_
],
$options
);
}
Hide Show 18 lines of Pod
sub
projects {
my
$self
=
shift
;
croak
'projects must be called with 0 to 1 arguments'
if
@_
< 0 or
@_
> 1;
croak
'The last argument (\%params) to projects must be a hash ref'
if
defined
(
$_
[0]) and
ref
(
$_
[0]) ne
'HASH'
;
my
$params
= (
@_
== 1) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'projects'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
user_projects {
my
$self
=
shift
;
croak
'user_projects must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($user_id) to user_projects must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to user_projects must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'users/:user_id/projects'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
project {
my
$self
=
shift
;
croak
'project must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($project_id) to project must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to project must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
project_users {
my
$self
=
shift
;
croak
'project_users must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($project_id) to project_users must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to project_users must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/users'
, [
@_
],
$options
);
}
Hide Show 10 lines of Pod
sub
create_project {
my
$self
=
shift
;
croak
'create_project must be called with 0 to 1 arguments'
if
@_
< 0 or
@_
> 1;
croak
'The last argument (\%params) to create_project must be a hash ref'
if
defined
(
$_
[0]) and
ref
(
$_
[0]) ne
'HASH'
;
my
$params
= (
@_
== 1) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'POST'
,
'projects'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
create_project_for_user {
my
$self
=
shift
;
croak
'create_project_for_user must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($user_id) to create_project_for_user must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to create_project_for_user must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{decode} = 0;
$options
->{content} =
$params
if
defined
$params
;
$self
->_call_rest_client(
'POST'
,
'projects/user/:user_id'
, [
@_
],
$options
);
return
;
}
Hide Show 11 lines of Pod
sub
edit_project {
my
$self
=
shift
;
croak
'edit_project must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($project_id) to edit_project must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to edit_project must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{decode} = 0;
$options
->{content} =
$params
if
defined
$params
;
$self
->_call_rest_client(
'PUT'
,
'projects/:project_id'
, [
@_
],
$options
);
return
;
}
Hide Show 11 lines of Pod
sub
fork_project {
my
$self
=
shift
;
croak
'fork_project must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($project_id) to fork_project must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to fork_project must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{decode} = 0;
$options
->{content} =
$params
if
defined
$params
;
$self
->_call_rest_client(
'POST'
,
'projects/:project_id/fork'
, [
@_
],
$options
);
return
;
}
Hide Show 11 lines of Pod
sub
project_forks {
my
$self
=
shift
;
croak
'project_forks must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($project_id) to project_forks must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to project_forks must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/forks'
, [
@_
],
$options
);
}
Hide Show 10 lines of Pod
sub
start_project {
my
$self
=
shift
;
croak
'start_project must be called with 1 arguments'
if
@_
!= 1;
croak
'The #1 argument ($project_id) to start_project must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
my
$options
= {};
return
$self
->_call_rest_client(
'POST'
,
'projects/:project_id/star'
, [
@_
],
$options
);
}
Hide Show 10 lines of Pod
sub
unstar_project {
my
$self
=
shift
;
croak
'unstar_project must be called with 1 arguments'
if
@_
!= 1;
croak
'The #1 argument ($project_id) to unstar_project must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
my
$options
= {};
return
$self
->_call_rest_client(
'POST'
,
'projects/:project_id/unstar'
, [
@_
],
$options
);
}
Hide Show 10 lines of Pod
sub
project_languages {
my
$self
=
shift
;
croak
'project_languages must be called with 1 arguments'
if
@_
!= 1;
croak
'The #1 argument ($project_id) to project_languages must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/languages'
, [
@_
],
$options
);
}
Hide Show 10 lines of Pod
sub
archive_project {
my
$self
=
shift
;
croak
'archive_project must be called with 1 arguments'
if
@_
!= 1;
croak
'The #1 argument ($project_id) to archive_project must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
my
$options
= {};
return
$self
->_call_rest_client(
'POST'
,
'projects/:project_id/archive'
, [
@_
],
$options
);
}
Hide Show 10 lines of Pod
sub
unarchive_project {
my
$self
=
shift
;
croak
'unarchive_project must be called with 1 arguments'
if
@_
!= 1;
croak
'The #1 argument ($project_id) to unarchive_project must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
my
$options
= {};
return
$self
->_call_rest_client(
'POST'
,
'projects/:project_id/unarchive'
, [
@_
],
$options
);
}
Hide Show 10 lines of Pod
sub
delete_project {
my
$self
=
shift
;
croak
'delete_project must be called with 1 arguments'
if
@_
!= 1;
croak
'The #1 argument ($project_id) to delete_project must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
my
$options
= {};
$options
->{decode} = 0;
$self
->_call_rest_client(
'DELETE'
,
'projects/:project_id'
, [
@_
],
$options
);
return
;
}
Hide Show 12 lines of Pod
sub
upload_file_to_project {
my
$self
=
shift
;
croak
'upload_file_to_project must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($project_id) to upload_file_to_project must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to upload_file_to_project must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'POST'
,
'projects/:project_id/uploads'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
share_project_with_group {
my
$self
=
shift
;
croak
'share_project_with_group must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($project_id) to share_project_with_group must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to share_project_with_group must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{decode} = 0;
$options
->{content} =
$params
if
defined
$params
;
$self
->_call_rest_client(
'POST'
,
'projects/:project_id/share'
, [
@_
],
$options
);
return
;
}
Hide Show 11 lines of Pod
sub
unshare_project_with_group {
my
$self
=
shift
;
croak
'unshare_project_with_group must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to unshare_project_with_group must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($group_id) to unshare_project_with_group must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
$options
->{decode} = 0;
$self
->_call_rest_client(
'DELETE'
,
'projects/:project_id/share/:group_id'
, [
@_
],
$options
);
return
;
}
Hide Show 10 lines of Pod
sub
project_hooks {
my
$self
=
shift
;
croak
'project_hooks must be called with 1 arguments'
if
@_
!= 1;
croak
'The #1 argument ($project_id) to project_hooks must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/hooks'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
project_hook {
my
$self
=
shift
;
croak
'project_hook must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to project_hook must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($hook_id) to project_hook must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/hooks/:hook_id'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
create_project_hook {
my
$self
=
shift
;
croak
'create_project_hook must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($project_id) to create_project_hook must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to create_project_hook must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'POST'
,
'projects/:project_id/hooks'
, [
@_
],
$options
);
}
Hide Show 12 lines of Pod
sub
edit_project_hook {
my
$self
=
shift
;
croak
'edit_project_hook must be called with 2 to 3 arguments'
if
@_
< 2 or
@_
> 3;
croak
'The #1 argument ($project_id) to edit_project_hook must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($hook_id) to edit_project_hook must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The last argument (\%params) to edit_project_hook must be a hash ref'
if
defined
(
$_
[2]) and
ref
(
$_
[2]) ne
'HASH'
;
my
$params
= (
@_
== 3) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'PUT'
,
'projects/:project_id/hooks/:hook_id'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
delete_project_hook {
my
$self
=
shift
;
croak
'delete_project_hook must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to delete_project_hook must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($hook_id) to delete_project_hook must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
$options
->{decode} = 0;
$self
->_call_rest_client(
'DELETE'
,
'projects/:project_id/hooks/:hook_id'
, [
@_
],
$options
);
return
;
}
Hide Show 11 lines of Pod
sub
set_project_fork {
my
$self
=
shift
;
croak
'set_project_fork must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to set_project_fork must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($from_project_id) to set_project_fork must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
$options
->{decode} = 0;
$self
->_call_rest_client(
'POST'
,
'projects/:project_id/fork/:from_project_id'
, [
@_
],
$options
);
return
;
}
Hide Show 10 lines of Pod
sub
clear_project_fork {
my
$self
=
shift
;
croak
'clear_project_fork must be called with 1 arguments'
if
@_
!= 1;
croak
'The #1 argument ($project_id) to clear_project_fork must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
my
$options
= {};
$options
->{decode} = 0;
$self
->_call_rest_client(
'DELETE'
,
'projects/:project_id/fork'
, [
@_
],
$options
);
return
;
}
Hide Show 10 lines of Pod
sub
start_housekeeping {
my
$self
=
shift
;
croak
'start_housekeeping must be called with 1 arguments'
if
@_
!= 1;
croak
'The #1 argument ($project_id) to start_housekeeping must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
my
$options
= {};
$options
->{decode} = 0;
$self
->_call_rest_client(
'POST'
,
'projects/:project_id/housekeeping'
, [
@_
],
$options
);
return
;
}
Hide Show 11 lines of Pod
sub
transfer_project_to_namespace {
my
$self
=
shift
;
croak
'transfer_project_to_namespace must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($project_id) to transfer_project_to_namespace must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to transfer_project_to_namespace must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{decode} = 0;
$options
->{content} =
$params
if
defined
$params
;
$self
->_call_rest_client(
'PUT'
,
'projects/:project_id/transfer'
, [
@_
],
$options
);
return
;
}
Hide Show 19 lines of Pod
sub
project_access_requests {
my
$self
=
shift
;
croak
'project_access_requests must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($project_id) to project_access_requests must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to project_access_requests must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/access_requests'
, [
@_
],
$options
);
}
Hide Show 10 lines of Pod
sub
request_project_access {
my
$self
=
shift
;
croak
'request_project_access must be called with 1 arguments'
if
@_
!= 1;
croak
'The #1 argument ($project_id) to request_project_access must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
my
$options
= {};
return
$self
->_call_rest_client(
'POST'
,
'projects/:project_id/access_requests'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
approve_project_access {
my
$self
=
shift
;
croak
'approve_project_access must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to approve_project_access must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($user_id) to approve_project_access must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
return
$self
->_call_rest_client(
'PUT'
,
'projects/:project_id/access_requests/:user_id/approve'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
deny_project_access {
my
$self
=
shift
;
croak
'deny_project_access must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to deny_project_access must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($user_id) to deny_project_access must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
$options
->{decode} = 0;
$self
->_call_rest_client(
'DELETE'
,
'projects/:project_id/access_requests/:user_id'
, [
@_
],
$options
);
return
;
}
Hide Show 18 lines of Pod
sub
project_badges {
my
$self
=
shift
;
croak
'project_badges must be called with 1 arguments'
if
@_
!= 1;
croak
'The #1 argument ($project_id) to project_badges must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/badges'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
project_badge {
my
$self
=
shift
;
croak
'project_badge must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to project_badge must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($badge_id) to project_badge must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/badges/:badge_id'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
create_project_badge {
my
$self
=
shift
;
croak
'create_project_badge must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($project_id) to create_project_badge must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to create_project_badge must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'POST'
,
'projects/:project_id/badges'
, [
@_
],
$options
);
}
Hide Show 12 lines of Pod
sub
edit_project_badge {
my
$self
=
shift
;
croak
'edit_project_badge must be called with 2 to 3 arguments'
if
@_
< 2 or
@_
> 3;
croak
'The #1 argument ($project_id) to edit_project_badge must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($badge_id) to edit_project_badge must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The last argument (\%params) to edit_project_badge must be a hash ref'
if
defined
(
$_
[2]) and
ref
(
$_
[2]) ne
'HASH'
;
my
$params
= (
@_
== 3) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'PUT'
,
'projects/:project_id/badges/:badge_id'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
delete_project_badge {
my
$self
=
shift
;
croak
'delete_project_badge must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to delete_project_badge must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($badge_id) to delete_project_badge must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
$options
->{decode} = 0;
$self
->_call_rest_client(
'DELETE'
,
'projects/:project_id/badges/:badge_id'
, [
@_
],
$options
);
return
;
}
Hide Show 11 lines of Pod
sub
preview_project_badge {
my
$self
=
shift
;
croak
'preview_project_badge must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($project_id) to preview_project_badge must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to preview_project_badge must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/badges/render'
, [
@_
],
$options
);
}
Hide Show 19 lines of Pod
sub
schedule_project_export {
my
$self
=
shift
;
croak
'schedule_project_export must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($project_id) to schedule_project_export must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to schedule_project_export must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{decode} = 0;
$options
->{content} =
$params
if
defined
$params
;
$self
->_call_rest_client(
'POST'
,
'projects/:project_id/export'
, [
@_
],
$options
);
return
;
}
Hide Show 10 lines of Pod
sub
project_export_status {
my
$self
=
shift
;
croak
'project_export_status must be called with 1 arguments'
if
@_
!= 1;
croak
'The #1 argument ($project_id) to project_export_status must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/export'
, [
@_
],
$options
);
}
Hide Show 10 lines of Pod
sub
download_project_export {
my
$self
=
shift
;
croak
'download_project_export must be called with 1 arguments'
if
@_
!= 1;
croak
'The #1 argument ($project_id) to download_project_export must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/export/download'
, [
@_
],
$options
);
}
Hide Show 10 lines of Pod
sub
schedule_project_import {
my
$self
=
shift
;
croak
'schedule_project_import must be called with 0 to 1 arguments'
if
@_
< 0 or
@_
> 1;
croak
'The last argument (\%params) to schedule_project_import must be a hash ref'
if
defined
(
$_
[0]) and
ref
(
$_
[0]) ne
'HASH'
;
my
$params
= (
@_
== 1) ?
pop
() :
undef
;
my
$options
= {};
$options
->{decode} = 0;
$options
->{content} =
$params
if
defined
$params
;
$self
->_call_rest_client(
'POST'
,
'projects/import'
, [
@_
],
$options
);
return
;
}
Hide Show 10 lines of Pod
sub
project_import_status {
my
$self
=
shift
;
croak
'project_import_status must be called with 1 arguments'
if
@_
!= 1;
croak
'The #1 argument ($project_id) to project_import_status must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/import'
, [
@_
],
$options
);
}
Hide Show 19 lines of Pod
sub
project_members {
my
$self
=
shift
;
croak
'project_members must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($project_id) to project_members must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to project_members must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/members'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
all_project_members {
my
$self
=
shift
;
croak
'all_project_members must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($project_id) to all_project_members must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to all_project_members must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/members/all'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
project_member {
my
$self
=
shift
;
croak
'project_member must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to project_member must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($user_id) to project_member must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/members/:user_id'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
add_project_member {
my
$self
=
shift
;
croak
'add_project_member must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($project_id) to add_project_member must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to add_project_member must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'POST'
,
'projects/:project_id/members'
, [
@_
],
$options
);
}
Hide Show 12 lines of Pod
sub
update_project_member {
my
$self
=
shift
;
croak
'update_project_member must be called with 2 to 3 arguments'
if
@_
< 2 or
@_
> 3;
croak
'The #1 argument ($project_id) to update_project_member must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($user_id) to update_project_member must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The last argument (\%params) to update_project_member must be a hash ref'
if
defined
(
$_
[2]) and
ref
(
$_
[2]) ne
'HASH'
;
my
$params
= (
@_
== 3) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'PUT'
,
'projects/:project_id/members/:user_id'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
remove_project_member {
my
$self
=
shift
;
croak
'remove_project_member must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to remove_project_member must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($user_id) to remove_project_member must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
$options
->{decode} = 0;
$self
->_call_rest_client(
'DELETE'
,
'projects/:project_id/members/:user_id'
, [
@_
],
$options
);
return
;
}
Hide Show 19 lines of Pod
sub
project_snippets {
my
$self
=
shift
;
croak
'project_snippets must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($project_id) to project_snippets must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to project_snippets must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/snippets'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
project_snippet {
my
$self
=
shift
;
croak
'project_snippet must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to project_snippet must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($snippet_id) to project_snippet must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/snippets/:snippet_id'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
create_project_snippet {
my
$self
=
shift
;
croak
'create_project_snippet must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($project_id) to create_project_snippet must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to create_project_snippet must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{decode} = 0;
$options
->{content} =
$params
if
defined
$params
;
$self
->_call_rest_client(
'POST'
,
'projects/:project_id/snippets'
, [
@_
],
$options
);
return
;
}
Hide Show 12 lines of Pod
sub
edit_project_snippet {
my
$self
=
shift
;
croak
'edit_project_snippet must be called with 2 to 3 arguments'
if
@_
< 2 or
@_
> 3;
croak
'The #1 argument ($project_id) to edit_project_snippet must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($snippet_id) to edit_project_snippet must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The last argument (\%params) to edit_project_snippet must be a hash ref'
if
defined
(
$_
[2]) and
ref
(
$_
[2]) ne
'HASH'
;
my
$params
= (
@_
== 3) ?
pop
() :
undef
;
my
$options
= {};
$options
->{decode} = 0;
$options
->{content} =
$params
if
defined
$params
;
$self
->_call_rest_client(
'PUT'
,
'projects/:project_id/snippets/:snippet_id'
, [
@_
],
$options
);
return
;
}
Hide Show 11 lines of Pod
sub
delete_project_snippet {
my
$self
=
shift
;
croak
'delete_project_snippet must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to delete_project_snippet must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($snippet_id) to delete_project_snippet must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
$options
->{decode} = 0;
$self
->_call_rest_client(
'DELETE'
,
'projects/:project_id/snippets/:snippet_id'
, [
@_
],
$options
);
return
;
}
Hide Show 11 lines of Pod
sub
project_snippet_content {
my
$self
=
shift
;
croak
'project_snippet_content must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to project_snippet_content must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($snippet_id) to project_snippet_content must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/snippets/:snippet_id/raw'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
project_snippet_user_agent_detail {
my
$self
=
shift
;
croak
'project_snippet_user_agent_detail must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to project_snippet_user_agent_detail must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($snippet_id) to project_snippet_user_agent_detail must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/snippets/:snippet_id/user_agent_detail'
, [
@_
],
$options
);
}
Hide Show 19 lines of Pod
sub
protected_branches {
my
$self
=
shift
;
croak
'protected_branches must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($project_id) to protected_branches must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to protected_branches must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/protected_branches'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
protected_branch {
my
$self
=
shift
;
croak
'protected_branch must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to protected_branch must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($branch_name) to protected_branch must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/protected_branches/:branch_name'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
protect_branch {
my
$self
=
shift
;
croak
'protect_branch must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($project_id) to protect_branch must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to protect_branch must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'POST'
,
'projects/:project_id/protected_branches'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
unprotect_branch {
my
$self
=
shift
;
croak
'unprotect_branch must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to unprotect_branch must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($branch_name) to unprotect_branch must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
$options
->{decode} = 0;
$self
->_call_rest_client(
'DELETE'
,
'projects/:project_id/protected_branches/:branch_name'
, [
@_
],
$options
);
return
;
}
Hide Show 19 lines of Pod
sub
protected_tags {
my
$self
=
shift
;
croak
'protected_tags must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($project_id) to protected_tags must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to protected_tags must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/protected_tags'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
protected_tag {
my
$self
=
shift
;
croak
'protected_tag must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to protected_tag must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($tag_name) to protected_tag must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/protected_tags/:tag_name'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
protect_tag {
my
$self
=
shift
;
croak
'protect_tag must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($project_id) to protect_tag must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to protect_tag must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'POST'
,
'projects/:project_id/protected_tags'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
unprotect_tag {
my
$self
=
shift
;
croak
'unprotect_tag must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to unprotect_tag must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($tag_name) to unprotect_tag must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
$options
->{decode} = 0;
$self
->_call_rest_client(
'DELETE'
,
'projects/:project_id/protected_tags/:tag_name'
, [
@_
],
$options
);
return
;
}
Hide Show 19 lines of Pod
sub
releases {
my
$self
=
shift
;
croak
'releases must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($project_id) to releases must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to releases must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/releases'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
release {
my
$self
=
shift
;
croak
'release must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to release must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($tag_name) to release must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/releases/:tag_name'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
create_release {
my
$self
=
shift
;
croak
'create_release must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($project_id) to create_release must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to create_release must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'POST'
,
'projects/:project_id/releases'
, [
@_
],
$options
);
}
Hide Show 12 lines of Pod
sub
update_release {
my
$self
=
shift
;
croak
'update_release must be called with 2 to 3 arguments'
if
@_
< 2 or
@_
> 3;
croak
'The #1 argument ($project_id) to update_release must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($tag_name) to update_release must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The last argument (\%params) to update_release must be a hash ref'
if
defined
(
$_
[2]) and
ref
(
$_
[2]) ne
'HASH'
;
my
$params
= (
@_
== 3) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'PUT'
,
'projects/:project_id/releases/:tag_name'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
delete_release {
my
$self
=
shift
;
croak
'delete_release must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to delete_release must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($tag_name) to delete_release must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
return
$self
->_call_rest_client(
'DELETE'
,
'projects/:project_id/releases/:tag_name'
, [
@_
],
$options
);
}
Hide Show 20 lines of Pod
sub
release_links {
my
$self
=
shift
;
croak
'release_links must be called with 2 to 3 arguments'
if
@_
< 2 or
@_
> 3;
croak
'The #1 argument ($project_id) to release_links must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($tag_name) to release_links must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The last argument (\%params) to release_links must be a hash ref'
if
defined
(
$_
[2]) and
ref
(
$_
[2]) ne
'HASH'
;
my
$params
= (
@_
== 3) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/releases/:tag_name/assets/links'
, [
@_
],
$options
);
}
Hide Show 12 lines of Pod
sub
release_link {
my
$self
=
shift
;
croak
'release_link must be called with 3 arguments'
if
@_
!= 3;
croak
'The #1 argument ($project_id) to release_link must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($tag_name) to release_link must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The #3 argument ($link_id) to release_link must be a scalar'
if
ref
(
$_
[2]) or (!
defined
$_
[2]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/releases/:tag_name/assets/links/:link_id'
, [
@_
],
$options
);
}
Hide Show 12 lines of Pod
sub
create_release_link {
my
$self
=
shift
;
croak
'create_release_link must be called with 2 to 3 arguments'
if
@_
< 2 or
@_
> 3;
croak
'The #1 argument ($project_id) to create_release_link must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($tag_name) to create_release_link must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The last argument (\%params) to create_release_link must be a hash ref'
if
defined
(
$_
[2]) and
ref
(
$_
[2]) ne
'HASH'
;
my
$params
= (
@_
== 3) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'POST'
,
'projects/:project_id/releases/:tag_name/assets/links'
, [
@_
],
$options
);
}
Hide Show 13 lines of Pod
sub
update_release_link {
my
$self
=
shift
;
croak
'update_release_link must be called with 3 to 4 arguments'
if
@_
< 3 or
@_
> 4;
croak
'The #1 argument ($project_id) to update_release_link must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($tag_name) to update_release_link must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The #3 argument ($link_id) to update_release_link must be a scalar'
if
ref
(
$_
[2]) or (!
defined
$_
[2]);
croak
'The last argument (\%params) to update_release_link must be a hash ref'
if
defined
(
$_
[3]) and
ref
(
$_
[3]) ne
'HASH'
;
my
$params
= (
@_
== 4) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'PUT'
,
'projects/:project_id/releases/:tag_name/assets/links/:link_id'
, [
@_
],
$options
);
}
Hide Show 12 lines of Pod
sub
delete_release_link {
my
$self
=
shift
;
croak
'delete_release_link must be called with 3 arguments'
if
@_
!= 3;
croak
'The #1 argument ($project_id) to delete_release_link must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($tag_name) to delete_release_link must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The #3 argument ($link_id) to delete_release_link must be a scalar'
if
ref
(
$_
[2]) or (!
defined
$_
[2]);
my
$options
= {};
return
$self
->_call_rest_client(
'DELETE'
,
'projects/:project_id/releases/:tag_name/assets/links/:link_id'
, [
@_
],
$options
);
}
Hide Show 18 lines of Pod
sub
remote_mirrors {
my
$self
=
shift
;
croak
'remote_mirrors must be called with 1 arguments'
if
@_
!= 1;
croak
'The #1 argument ($project_id) to remote_mirrors must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/remote_mirrors'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
create_remote_mirror {
my
$self
=
shift
;
croak
'create_remote_mirror must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($project_id) to create_remote_mirror must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to create_remote_mirror must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'POST'
,
'projects/:project_id/remote_mirrors'
, [
@_
],
$options
);
}
Hide Show 12 lines of Pod
sub
edit_remote_mirror {
my
$self
=
shift
;
croak
'edit_remote_mirror must be called with 2 to 3 arguments'
if
@_
< 2 or
@_
> 3;
croak
'The #1 argument ($project_id) to edit_remote_mirror must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($mirror_id) to edit_remote_mirror must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The last argument (\%params) to edit_remote_mirror must be a hash ref'
if
defined
(
$_
[2]) and
ref
(
$_
[2]) ne
'HASH'
;
my
$params
= (
@_
== 3) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'PUT'
,
'projects/:project_id/remote_mirrors/:mirror_id'
, [
@_
],
$options
);
}
Hide Show 19 lines of Pod
sub
tree {
my
$self
=
shift
;
croak
'tree must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($project_id) to tree must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to tree must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/repository/tree'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
blob {
my
$self
=
shift
;
croak
'blob must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to blob must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($sha) to blob must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/repository/blobs/:sha'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
raw_blob {
my
$self
=
shift
;
croak
'raw_blob must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to raw_blob must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($sha) to raw_blob must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/repository/blobs/:sha/raw'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
archive {
my
$self
=
shift
;
croak
'archive must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($project_id) to archive must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to archive must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{decode} = 0;
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/repository/archive'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
compare {
my
$self
=
shift
;
croak
'compare must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($project_id) to compare must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to compare must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/repository/compare'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
contributors {
my
$self
=
shift
;
croak
'contributors must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($project_id) to contributors must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to contributors must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/repository/contributors'
, [
@_
],
$options
);
}
Hide Show 20 lines of Pod
sub
file {
my
$self
=
shift
;
croak
'file must be called with 2 to 3 arguments'
if
@_
< 2 or
@_
> 3;
croak
'The #1 argument ($project_id) to file must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($file_path) to file must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The last argument (\%params) to file must be a hash ref'
if
defined
(
$_
[2]) and
ref
(
$_
[2]) ne
'HASH'
;
my
$params
= (
@_
== 3) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/repository/files/:file_path'
, [
@_
],
$options
);
}
Hide Show 12 lines of Pod
sub
raw_file {
my
$self
=
shift
;
croak
'raw_file must be called with 2 to 3 arguments'
if
@_
< 2 or
@_
> 3;
croak
'The #1 argument ($project_id) to raw_file must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($file_path) to raw_file must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The last argument (\%params) to raw_file must be a hash ref'
if
defined
(
$_
[2]) and
ref
(
$_
[2]) ne
'HASH'
;
my
$params
= (
@_
== 3) ?
pop
() :
undef
;
my
$options
= {};
$options
->{decode} = 0;
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/repository/files/:file_path/raw'
, [
@_
],
$options
);
}
Hide Show 12 lines of Pod
sub
create_file {
my
$self
=
shift
;
croak
'create_file must be called with 2 to 3 arguments'
if
@_
< 2 or
@_
> 3;
croak
'The #1 argument ($project_id) to create_file must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($file_path) to create_file must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The last argument (\%params) to create_file must be a hash ref'
if
defined
(
$_
[2]) and
ref
(
$_
[2]) ne
'HASH'
;
my
$params
= (
@_
== 3) ?
pop
() :
undef
;
my
$options
= {};
$options
->{decode} = 0;
$options
->{content} =
$params
if
defined
$params
;
$self
->_call_rest_client(
'POST'
,
'projects/:project_id/repository/files/:file_path'
, [
@_
],
$options
);
return
;
}
Hide Show 12 lines of Pod
sub
edit_file {
my
$self
=
shift
;
croak
'edit_file must be called with 2 to 3 arguments'
if
@_
< 2 or
@_
> 3;
croak
'The #1 argument ($project_id) to edit_file must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($file_path) to edit_file must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The last argument (\%params) to edit_file must be a hash ref'
if
defined
(
$_
[2]) and
ref
(
$_
[2]) ne
'HASH'
;
my
$params
= (
@_
== 3) ?
pop
() :
undef
;
my
$options
= {};
$options
->{decode} = 0;
$options
->{content} =
$params
if
defined
$params
;
$self
->_call_rest_client(
'PUT'
,
'projects/:project_id/repository/files/:file_path'
, [
@_
],
$options
);
return
;
}
Hide Show 12 lines of Pod
sub
delete_file {
my
$self
=
shift
;
croak
'delete_file must be called with 2 to 3 arguments'
if
@_
< 2 or
@_
> 3;
croak
'The #1 argument ($project_id) to delete_file must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($file_path) to delete_file must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The last argument (\%params) to delete_file must be a hash ref'
if
defined
(
$_
[2]) and
ref
(
$_
[2]) ne
'HASH'
;
my
$params
= (
@_
== 3) ?
pop
() :
undef
;
my
$options
= {};
$options
->{decode} = 0;
$options
->{content} =
$params
if
defined
$params
;
$self
->_call_rest_client(
'DELETE'
,
'projects/:project_id/repository/files/:file_path'
, [
@_
],
$options
);
return
;
}
Hide Show 18 lines of Pod
sub
runners {
my
$self
=
shift
;
croak
'runners must be called with 0 to 1 arguments'
if
@_
< 0 or
@_
> 1;
croak
'The last argument (\%params) to runners must be a hash ref'
if
defined
(
$_
[0]) and
ref
(
$_
[0]) ne
'HASH'
;
my
$params
= (
@_
== 1) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'runners'
, [
@_
],
$options
);
}
Hide Show 10 lines of Pod
sub
all_runners {
my
$self
=
shift
;
croak
'all_runners must be called with 0 to 1 arguments'
if
@_
< 0 or
@_
> 1;
croak
'The last argument (\%params) to all_runners must be a hash ref'
if
defined
(
$_
[0]) and
ref
(
$_
[0]) ne
'HASH'
;
my
$params
= (
@_
== 1) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'runners/all'
, [
@_
],
$options
);
}
Hide Show 10 lines of Pod
sub
runner {
my
$self
=
shift
;
croak
'runner must be called with 1 arguments'
if
@_
!= 1;
croak
'The #1 argument ($runner_id) to runner must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'runners/:runner_id'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
update_runner {
my
$self
=
shift
;
croak
'update_runner must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($runner_id) to update_runner must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to update_runner must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'PUT'
,
'runners/:runner_id'
, [
@_
],
$options
);
}
Hide Show 10 lines of Pod
sub
delete_runner {
my
$self
=
shift
;
croak
'delete_runner must be called with 1 arguments'
if
@_
!= 1;
croak
'The #1 argument ($runner_id) to delete_runner must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
my
$options
= {};
$options
->{decode} = 0;
$self
->_call_rest_client(
'DELETE'
,
'runners/:runner_id'
, [
@_
],
$options
);
return
;
}
Hide Show 11 lines of Pod
sub
runner_jobs {
my
$self
=
shift
;
croak
'runner_jobs must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($runner_id) to runner_jobs must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to runner_jobs must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'runners/:runner_id/jobs'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
project_runners {
my
$self
=
shift
;
croak
'project_runners must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($project_id) to project_runners must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to project_runners must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/runners'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
enable_project_runner {
my
$self
=
shift
;
croak
'enable_project_runner must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($project_id) to enable_project_runner must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to enable_project_runner must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'POST'
,
'projects/:project_id/runners'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
disable_project_runner {
my
$self
=
shift
;
croak
'disable_project_runner must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to disable_project_runner must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($runner_id) to disable_project_runner must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
return
$self
->_call_rest_client(
'DELETE'
,
'projects/:project_id/runners/:runner_id'
, [
@_
],
$options
);
}
Hide Show 18 lines of Pod
sub
search {
my
$self
=
shift
;
croak
'search must be called with 0 to 1 arguments'
if
@_
< 0 or
@_
> 1;
croak
'The last argument (\%params) to search must be a hash ref'
if
defined
(
$_
[0]) and
ref
(
$_
[0]) ne
'HASH'
;
my
$params
= (
@_
== 1) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'search'
, [
@_
],
$options
);
}
Hide Show 19 lines of Pod
sub
project_service {
my
$self
=
shift
;
croak
'project_service must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to project_service must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($service_name) to project_service must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/services/:service_name'
, [
@_
],
$options
);
}
Hide Show 12 lines of Pod
sub
edit_project_service {
my
$self
=
shift
;
croak
'edit_project_service must be called with 2 to 3 arguments'
if
@_
< 2 or
@_
> 3;
croak
'The #1 argument ($project_id) to edit_project_service must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($service_name) to edit_project_service must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The last argument (\%params) to edit_project_service must be a hash ref'
if
defined
(
$_
[2]) and
ref
(
$_
[2]) ne
'HASH'
;
my
$params
= (
@_
== 3) ?
pop
() :
undef
;
my
$options
= {};
$options
->{decode} = 0;
$options
->{content} =
$params
if
defined
$params
;
$self
->_call_rest_client(
'PUT'
,
'projects/:project_id/services/:service_name'
, [
@_
],
$options
);
return
;
}
Hide Show 11 lines of Pod
sub
delete_project_service {
my
$self
=
shift
;
croak
'delete_project_service must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to delete_project_service must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($service_name) to delete_project_service must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
$options
->{decode} = 0;
$self
->_call_rest_client(
'DELETE'
,
'projects/:project_id/services/:service_name'
, [
@_
],
$options
);
return
;
}
Hide Show 16 lines of Pod
sub
settings {
my
$self
=
shift
;
croak
"The settings method does not take any arguments"
if
@_
;
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'application/settings'
, [
@_
],
$options
);
}
Hide Show 10 lines of Pod
sub
update_settings {
my
$self
=
shift
;
croak
'update_settings must be called with 0 to 1 arguments'
if
@_
< 0 or
@_
> 1;
croak
'The last argument (\%params) to update_settings must be a hash ref'
if
defined
(
$_
[0]) and
ref
(
$_
[0]) ne
'HASH'
;
my
$params
= (
@_
== 1) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'PUT'
,
'application/settings'
, [
@_
],
$options
);
}
Hide Show 16 lines of Pod
sub
statistics {
my
$self
=
shift
;
croak
"The statistics method does not take any arguments"
if
@_
;
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'application/statistics'
, [
@_
],
$options
);
}
Hide Show 16 lines of Pod
sub
queue_metrics {
my
$self
=
shift
;
croak
"The queue_metrics method does not take any arguments"
if
@_
;
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'sidekiq/queue_metrics'
, [
@_
],
$options
);
}
Hide Show 8 lines of Pod
sub
process_metrics {
my
$self
=
shift
;
croak
"The process_metrics method does not take any arguments"
if
@_
;
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'sidekiq/process_metrics'
, [
@_
],
$options
);
}
Hide Show 8 lines of Pod
sub
job_stats {
my
$self
=
shift
;
croak
"The job_stats method does not take any arguments"
if
@_
;
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'sidekiq/job_stats'
, [
@_
],
$options
);
}
Hide Show 8 lines of Pod
sub
compound_metrics {
my
$self
=
shift
;
croak
"The compound_metrics method does not take any arguments"
if
@_
;
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'sidekiq/compound_metrics'
, [
@_
],
$options
);
}
Hide Show 18 lines of Pod
sub
hooks {
my
$self
=
shift
;
croak
'hooks must be called with 0 to 1 arguments'
if
@_
< 0 or
@_
> 1;
croak
'The last argument (\%params) to hooks must be a hash ref'
if
defined
(
$_
[0]) and
ref
(
$_
[0]) ne
'HASH'
;
my
$params
= (
@_
== 1) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'hooks'
, [
@_
],
$options
);
}
Hide Show 10 lines of Pod
sub
create_hook {
my
$self
=
shift
;
croak
'create_hook must be called with 0 to 1 arguments'
if
@_
< 0 or
@_
> 1;
croak
'The last argument (\%params) to create_hook must be a hash ref'
if
defined
(
$_
[0]) and
ref
(
$_
[0]) ne
'HASH'
;
my
$params
= (
@_
== 1) ?
pop
() :
undef
;
my
$options
= {};
$options
->{decode} = 0;
$options
->{content} =
$params
if
defined
$params
;
$self
->_call_rest_client(
'POST'
,
'hooks'
, [
@_
],
$options
);
return
;
}
Hide Show 10 lines of Pod
sub
test_hook {
my
$self
=
shift
;
croak
'test_hook must be called with 1 arguments'
if
@_
!= 1;
croak
'The #1 argument ($hook_id) to test_hook must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'hooks/:hook_id'
, [
@_
],
$options
);
}
Hide Show 10 lines of Pod
sub
delete_hook {
my
$self
=
shift
;
croak
'delete_hook must be called with 1 arguments'
if
@_
!= 1;
croak
'The #1 argument ($hook_id) to delete_hook must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
my
$options
= {};
$options
->{decode} = 0;
$self
->_call_rest_client(
'DELETE'
,
'hooks/:hook_id'
, [
@_
],
$options
);
return
;
}
Hide Show 19 lines of Pod
sub
tags {
my
$self
=
shift
;
croak
'tags must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($project_id) to tags must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to tags must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/repository/tags'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
tag {
my
$self
=
shift
;
croak
'tag must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to tag must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($tag_name) to tag must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/repository/tags/:tag_name'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
create_tag {
my
$self
=
shift
;
croak
'create_tag must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($project_id) to create_tag must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to create_tag must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'POST'
,
'projects/:project_id/repository/tags'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
delete_tag {
my
$self
=
shift
;
croak
'delete_tag must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to delete_tag must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($tag_name) to delete_tag must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
$options
->{decode} = 0;
$self
->_call_rest_client(
'DELETE'
,
'projects/:project_id/repository/tags/:tag_name'
, [
@_
],
$options
);
return
;
}
Hide Show 12 lines of Pod
sub
create_tag_release {
my
$self
=
shift
;
croak
'create_tag_release must be called with 2 to 3 arguments'
if
@_
< 2 or
@_
> 3;
croak
'The #1 argument ($project_id) to create_tag_release must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($tag_name) to create_tag_release must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The last argument (\%params) to create_tag_release must be a hash ref'
if
defined
(
$_
[2]) and
ref
(
$_
[2]) ne
'HASH'
;
my
$params
= (
@_
== 3) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'POST'
,
'projects/:project_id/repository/tags/:tag_name/release'
, [
@_
],
$options
);
}
Hide Show 12 lines of Pod
sub
update_tag_release {
my
$self
=
shift
;
croak
'update_tag_release must be called with 2 to 3 arguments'
if
@_
< 2 or
@_
> 3;
croak
'The #1 argument ($project_id) to update_tag_release must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($tag_name) to update_tag_release must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The last argument (\%params) to update_tag_release must be a hash ref'
if
defined
(
$_
[2]) and
ref
(
$_
[2]) ne
'HASH'
;
my
$params
= (
@_
== 3) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'PUT'
,
'projects/:project_id/repository/tags/:tag_name/release'
, [
@_
],
$options
);
}
Hide Show 18 lines of Pod
sub
todos {
my
$self
=
shift
;
croak
'todos must be called with 0 to 1 arguments'
if
@_
< 0 or
@_
> 1;
croak
'The last argument (\%params) to todos must be a hash ref'
if
defined
(
$_
[0]) and
ref
(
$_
[0]) ne
'HASH'
;
my
$params
= (
@_
== 1) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'todos'
, [
@_
],
$options
);
}
Hide Show 10 lines of Pod
sub
mark_todo_done {
my
$self
=
shift
;
croak
'mark_todo_done must be called with 1 arguments'
if
@_
!= 1;
croak
'The #1 argument ($todo_id) to mark_todo_done must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
my
$options
= {};
return
$self
->_call_rest_client(
'POST'
,
'todos/:todo_id/mark_as_done'
, [
@_
],
$options
);
}
Hide Show 8 lines of Pod
sub
mark_all_todos_done {
my
$self
=
shift
;
croak
"The mark_all_todos_done method does not take any arguments"
if
@_
;
my
$options
= {};
$options
->{decode} = 0;
$self
->_call_rest_client(
'POST'
,
'todos/mark_as_done'
, [
@_
],
$options
);
return
;
}
Hide Show 18 lines of Pod
sub
users {
my
$self
=
shift
;
croak
'users must be called with 0 to 1 arguments'
if
@_
< 0 or
@_
> 1;
croak
'The last argument (\%params) to users must be a hash ref'
if
defined
(
$_
[0]) and
ref
(
$_
[0]) ne
'HASH'
;
my
$params
= (
@_
== 1) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'users'
, [
@_
],
$options
);
}
Hide Show 10 lines of Pod
sub
user {
my
$self
=
shift
;
croak
'user must be called with 1 arguments'
if
@_
!= 1;
croak
'The #1 argument ($user_id) to user must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'users/:user_id'
, [
@_
],
$options
);
}
Hide Show 10 lines of Pod
sub
create_user {
my
$self
=
shift
;
croak
'create_user must be called with 0 to 1 arguments'
if
@_
< 0 or
@_
> 1;
croak
'The last argument (\%params) to create_user must be a hash ref'
if
defined
(
$_
[0]) and
ref
(
$_
[0]) ne
'HASH'
;
my
$params
= (
@_
== 1) ?
pop
() :
undef
;
my
$options
= {};
$options
->{decode} = 0;
$options
->{content} =
$params
if
defined
$params
;
$self
->_call_rest_client(
'POST'
,
'users'
, [
@_
],
$options
);
return
;
}
Hide Show 11 lines of Pod
sub
edit_user {
my
$self
=
shift
;
croak
'edit_user must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($user_id) to edit_user must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to edit_user must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{decode} = 0;
$options
->{content} =
$params
if
defined
$params
;
$self
->_call_rest_client(
'PUT'
,
'users/:user_id'
, [
@_
],
$options
);
return
;
}
Hide Show 11 lines of Pod
sub
delete_user {
my
$self
=
shift
;
croak
'delete_user must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($user_id) to delete_user must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to delete_user must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{decode} = 0;
$options
->{content} =
$params
if
defined
$params
;
$self
->_call_rest_client(
'DELETE'
,
'users/:user_id'
, [
@_
],
$options
);
return
;
}
Hide Show 8 lines of Pod
sub
current_user {
my
$self
=
shift
;
croak
"The current_user method does not take any arguments"
if
@_
;
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'user'
, [
@_
],
$options
);
}
Hide Show 10 lines of Pod
sub
current_user_ssh_keys {
my
$self
=
shift
;
croak
'current_user_ssh_keys must be called with 0 to 1 arguments'
if
@_
< 0 or
@_
> 1;
croak
'The last argument (\%params) to current_user_ssh_keys must be a hash ref'
if
defined
(
$_
[0]) and
ref
(
$_
[0]) ne
'HASH'
;
my
$params
= (
@_
== 1) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'user/keys'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
user_ssh_keys {
my
$self
=
shift
;
croak
'user_ssh_keys must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($user_id) to user_ssh_keys must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to user_ssh_keys must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'users/:user_id/keys'
, [
@_
],
$options
);
}
Hide Show 10 lines of Pod
sub
user_ssh_key {
my
$self
=
shift
;
croak
'user_ssh_key must be called with 1 arguments'
if
@_
!= 1;
croak
'The #1 argument ($key_id) to user_ssh_key must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'user/keys/:key_id'
, [
@_
],
$options
);
}
Hide Show 10 lines of Pod
sub
create_current_user_ssh_key {
my
$self
=
shift
;
croak
'create_current_user_ssh_key must be called with 0 to 1 arguments'
if
@_
< 0 or
@_
> 1;
croak
'The last argument (\%params) to create_current_user_ssh_key must be a hash ref'
if
defined
(
$_
[0]) and
ref
(
$_
[0]) ne
'HASH'
;
my
$params
= (
@_
== 1) ?
pop
() :
undef
;
my
$options
= {};
$options
->{decode} = 0;
$options
->{content} =
$params
if
defined
$params
;
$self
->_call_rest_client(
'POST'
,
'user/keys'
, [
@_
],
$options
);
return
;
}
Hide Show 11 lines of Pod
sub
create_user_ssh_key {
my
$self
=
shift
;
croak
'create_user_ssh_key must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($user_id) to create_user_ssh_key must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to create_user_ssh_key must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{decode} = 0;
$options
->{content} =
$params
if
defined
$params
;
$self
->_call_rest_client(
'POST'
,
'users/:user_id/keys'
, [
@_
],
$options
);
return
;
}
Hide Show 10 lines of Pod
sub
delete_current_user_ssh_key {
my
$self
=
shift
;
croak
'delete_current_user_ssh_key must be called with 1 arguments'
if
@_
!= 1;
croak
'The #1 argument ($key_id) to delete_current_user_ssh_key must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
my
$options
= {};
$options
->{decode} = 0;
$self
->_call_rest_client(
'DELETE'
,
'user/keys/:key_id'
, [
@_
],
$options
);
return
;
}
Hide Show 11 lines of Pod
sub
delete_user_ssh_key {
my
$self
=
shift
;
croak
'delete_user_ssh_key must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($user_id) to delete_user_ssh_key must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($key_id) to delete_user_ssh_key must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
$options
->{decode} = 0;
$self
->_call_rest_client(
'DELETE'
,
'users/:user_id/keys/:key_id'
, [
@_
],
$options
);
return
;
}
Hide Show 10 lines of Pod
sub
current_user_gpg_keys {
my
$self
=
shift
;
croak
'current_user_gpg_keys must be called with 0 to 1 arguments'
if
@_
< 0 or
@_
> 1;
croak
'The last argument (\%params) to current_user_gpg_keys must be a hash ref'
if
defined
(
$_
[0]) and
ref
(
$_
[0]) ne
'HASH'
;
my
$params
= (
@_
== 1) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'user/gpg_keys'
, [
@_
],
$options
);
}
Hide Show 10 lines of Pod
sub
current_user_gpg_key {
my
$self
=
shift
;
croak
'current_user_gpg_key must be called with 1 arguments'
if
@_
!= 1;
croak
'The #1 argument ($key_id) to current_user_gpg_key must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'user/gpg_keys/:key_id'
, [
@_
],
$options
);
}
Hide Show 10 lines of Pod
sub
create_current_user_gpg_key {
my
$self
=
shift
;
croak
'create_current_user_gpg_key must be called with 0 to 1 arguments'
if
@_
< 0 or
@_
> 1;
croak
'The last argument (\%params) to create_current_user_gpg_key must be a hash ref'
if
defined
(
$_
[0]) and
ref
(
$_
[0]) ne
'HASH'
;
my
$params
= (
@_
== 1) ?
pop
() :
undef
;
my
$options
= {};
$options
->{decode} = 0;
$options
->{content} =
$params
if
defined
$params
;
$self
->_call_rest_client(
'POST'
,
'user/gpg_keys'
, [
@_
],
$options
);
return
;
}
Hide Show 10 lines of Pod
sub
delete_current_user_gpg_key {
my
$self
=
shift
;
croak
'delete_current_user_gpg_key must be called with 1 arguments'
if
@_
!= 1;
croak
'The #1 argument ($key_id) to delete_current_user_gpg_key must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
my
$options
= {};
$options
->{decode} = 0;
$self
->_call_rest_client(
'DELETE'
,
'user/gpg_keys/:key_id'
, [
@_
],
$options
);
return
;
}
Hide Show 11 lines of Pod
sub
user_gpg_keys {
my
$self
=
shift
;
croak
'user_gpg_keys must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($user_id) to user_gpg_keys must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to user_gpg_keys must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'users/:user_id/gpg_keys'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
user_gpg_key {
my
$self
=
shift
;
croak
'user_gpg_key must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($user_id) to user_gpg_key must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($key_id) to user_gpg_key must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'users/:user_id/gpg_keys/:key_id'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
create_user_gpg_key {
my
$self
=
shift
;
croak
'create_user_gpg_key must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($user_id) to create_user_gpg_key must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to create_user_gpg_key must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'POST'
,
'users/:user_id/gpg_keys'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
delete_user_gpg_key {
my
$self
=
shift
;
croak
'delete_user_gpg_key must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($user_id) to delete_user_gpg_key must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($key_id) to delete_user_gpg_key must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
$options
->{decode} = 0;
$self
->_call_rest_client(
'DELETE'
,
'users/:user_id/gpg_keys/:key_id'
, [
@_
],
$options
);
return
;
}
Hide Show 10 lines of Pod
sub
current_user_emails {
my
$self
=
shift
;
croak
'current_user_emails must be called with 0 to 1 arguments'
if
@_
< 0 or
@_
> 1;
croak
'The last argument (\%params) to current_user_emails must be a hash ref'
if
defined
(
$_
[0]) and
ref
(
$_
[0]) ne
'HASH'
;
my
$params
= (
@_
== 1) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'user/emails'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
user_emails {
my
$self
=
shift
;
croak
'user_emails must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($user_id) to user_emails must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to user_emails must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'users/:user_id/emails'
, [
@_
],
$options
);
}
Hide Show 10 lines of Pod
sub
current_user_email {
my
$self
=
shift
;
croak
'current_user_email must be called with 1 arguments'
if
@_
!= 1;
croak
'The #1 argument ($email_id) to current_user_email must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'user/emails/:email_id'
, [
@_
],
$options
);
}
Hide Show 10 lines of Pod
sub
create_current_user_email {
my
$self
=
shift
;
croak
'create_current_user_email must be called with 0 to 1 arguments'
if
@_
< 0 or
@_
> 1;
croak
'The last argument (\%params) to create_current_user_email must be a hash ref'
if
defined
(
$_
[0]) and
ref
(
$_
[0]) ne
'HASH'
;
my
$params
= (
@_
== 1) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'POST'
,
'user/emails'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
create_user_email {
my
$self
=
shift
;
croak
'create_user_email must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($user_id) to create_user_email must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to create_user_email must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'POST'
,
'users/:user_id/emails'
, [
@_
],
$options
);
}
Hide Show 10 lines of Pod
sub
delete_current_user_email {
my
$self
=
shift
;
croak
'delete_current_user_email must be called with 1 arguments'
if
@_
!= 1;
croak
'The #1 argument ($email_id) to delete_current_user_email must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
my
$options
= {};
$options
->{decode} = 0;
$self
->_call_rest_client(
'DELETE'
,
'user/emails/:email_id'
, [
@_
],
$options
);
return
;
}
Hide Show 11 lines of Pod
sub
delete_user_email {
my
$self
=
shift
;
croak
'delete_user_email must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($user_id) to delete_user_email must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($email_id) to delete_user_email must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
$options
->{decode} = 0;
$self
->_call_rest_client(
'DELETE'
,
'users/:user_id/emails/:email_id'
, [
@_
],
$options
);
return
;
}
Hide Show 10 lines of Pod
sub
block_user {
my
$self
=
shift
;
croak
'block_user must be called with 1 arguments'
if
@_
!= 1;
croak
'The #1 argument ($user_id) to block_user must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
my
$options
= {};
return
$self
->_call_rest_client(
'POST'
,
'users/:user_id/block'
, [
@_
],
$options
);
}
Hide Show 10 lines of Pod
sub
unblock_user {
my
$self
=
shift
;
croak
'unblock_user must be called with 1 arguments'
if
@_
!= 1;
croak
'The #1 argument ($user_id) to unblock_user must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
my
$options
= {};
return
$self
->_call_rest_client(
'POST'
,
'users/:user_id/unblock'
, [
@_
],
$options
);
}
Hide Show 10 lines of Pod
sub
approve_user {
my
$self
=
shift
;
croak
'approve_user must be called with 1 arguments'
if
@_
!= 1;
croak
'The #1 argument ($user_id) to approve_user must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
my
$options
= {};
$options
->{decode} = 0;
$self
->_call_rest_client(
'POST'
,
'users/:user_id/approve'
, [
@_
],
$options
);
return
;
}
Hide Show 10 lines of Pod
sub
reject_user {
my
$self
=
shift
;
croak
'reject_user must be called with 1 arguments'
if
@_
!= 1;
croak
'The #1 argument ($user_id) to reject_user must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
my
$options
= {};
$options
->{decode} = 0;
$self
->_call_rest_client(
'POST'
,
'users/:user_id/reject'
, [
@_
],
$options
);
return
;
}
Hide Show 10 lines of Pod
sub
activate_user {
my
$self
=
shift
;
croak
'activate_user must be called with 1 arguments'
if
@_
!= 1;
croak
'The #1 argument ($user_id) to activate_user must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
my
$options
= {};
$options
->{decode} = 0;
$self
->_call_rest_client(
'POST'
,
'users/:user_id/activate'
, [
@_
],
$options
);
return
;
}
Hide Show 10 lines of Pod
sub
deactivate_user {
my
$self
=
shift
;
croak
'deactivate_user must be called with 1 arguments'
if
@_
!= 1;
croak
'The #1 argument ($user_id) to deactivate_user must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
my
$options
= {};
$options
->{decode} = 0;
$self
->_call_rest_client(
'POST'
,
'users/:user_id/deactivate'
, [
@_
],
$options
);
return
;
}
Hide Show 10 lines of Pod
sub
ban_user {
my
$self
=
shift
;
croak
'ban_user must be called with 1 arguments'
if
@_
!= 1;
croak
'The #1 argument ($user_id) to ban_user must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
my
$options
= {};
$options
->{decode} = 0;
$self
->_call_rest_client(
'POST'
,
'users/:user_id/ban'
, [
@_
],
$options
);
return
;
}
Hide Show 10 lines of Pod
sub
unban_user {
my
$self
=
shift
;
croak
'unban_user must be called with 1 arguments'
if
@_
!= 1;
croak
'The #1 argument ($user_id) to unban_user must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
my
$options
= {};
$options
->{decode} = 0;
$self
->_call_rest_client(
'POST'
,
'users/:user_id/unban'
, [
@_
],
$options
);
return
;
}
Hide Show 11 lines of Pod
sub
user_impersonation_tokens {
my
$self
=
shift
;
croak
'user_impersonation_tokens must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($user_id) to user_impersonation_tokens must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to user_impersonation_tokens must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'users/:user_id/impersonation_tokens'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
user_impersonation_token {
my
$self
=
shift
;
croak
'user_impersonation_token must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($user_id) to user_impersonation_token must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($impersonation_token_id) to user_impersonation_token must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'users/:user_id/impersonation_tokens/:impersonation_token_id'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
create_user_impersonation_token {
my
$self
=
shift
;
croak
'create_user_impersonation_token must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($user_id) to create_user_impersonation_token must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to create_user_impersonation_token must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'POST'
,
'users/:user_id/impersonation_tokens'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
delete_user_impersonation_token {
my
$self
=
shift
;
croak
'delete_user_impersonation_token must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($user_id) to delete_user_impersonation_token must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($impersonation_token_id) to delete_user_impersonation_token must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
$options
->{decode} = 0;
$self
->_call_rest_client(
'DELETE'
,
'users/:user_id/impersonation_tokens/:impersonation_token_id'
, [
@_
],
$options
);
return
;
}
Hide Show 10 lines of Pod
sub
all_user_activities {
my
$self
=
shift
;
croak
'all_user_activities must be called with 0 to 1 arguments'
if
@_
< 0 or
@_
> 1;
croak
'The last argument (\%params) to all_user_activities must be a hash ref'
if
defined
(
$_
[0]) and
ref
(
$_
[0]) ne
'HASH'
;
my
$params
= (
@_
== 1) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'user/activities'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
user_memberships {
my
$self
=
shift
;
croak
'user_memberships must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($user_id) to user_memberships must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to user_memberships must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'users/:user_id/memberships'
, [
@_
],
$options
);
}
Hide Show 18 lines of Pod
sub
lint {
my
$self
=
shift
;
croak
'lint must be called with 0 to 1 arguments'
if
@_
< 0 or
@_
> 1;
croak
'The last argument (\%params) to lint must be a hash ref'
if
defined
(
$_
[0]) and
ref
(
$_
[0]) ne
'HASH'
;
my
$params
= (
@_
== 1) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'POST'
,
'lint'
, [
@_
],
$options
);
}
Hide Show 16 lines of Pod
sub
version {
my
$self
=
shift
;
croak
"The version method does not take any arguments"
if
@_
;
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'version'
, [
@_
],
$options
);
}
Hide Show 19 lines of Pod
sub
wiki_pages {
my
$self
=
shift
;
croak
'wiki_pages must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($project_id) to wiki_pages must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to wiki_pages must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{query} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/wikis'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
wiki_page {
my
$self
=
shift
;
croak
'wiki_page must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to wiki_page must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($slug) to wiki_page must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
return
$self
->_call_rest_client(
'GET'
,
'projects/:project_id/wikis/:slug'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
create_wiki_page {
my
$self
=
shift
;
croak
'create_wiki_page must be called with 1 to 2 arguments'
if
@_
< 1 or
@_
> 2;
croak
'The #1 argument ($project_id) to create_wiki_page must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The last argument (\%params) to create_wiki_page must be a hash ref'
if
defined
(
$_
[1]) and
ref
(
$_
[1]) ne
'HASH'
;
my
$params
= (
@_
== 2) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'POST'
,
'projects/:project_id/wikis'
, [
@_
],
$options
);
}
Hide Show 12 lines of Pod
sub
edit_wiki_page {
my
$self
=
shift
;
croak
'edit_wiki_page must be called with 2 to 3 arguments'
if
@_
< 2 or
@_
> 3;
croak
'The #1 argument ($project_id) to edit_wiki_page must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($slug) to edit_wiki_page must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
croak
'The last argument (\%params) to edit_wiki_page must be a hash ref'
if
defined
(
$_
[2]) and
ref
(
$_
[2]) ne
'HASH'
;
my
$params
= (
@_
== 3) ?
pop
() :
undef
;
my
$options
= {};
$options
->{content} =
$params
if
defined
$params
;
return
$self
->_call_rest_client(
'PUT'
,
'projects/:project_id/wikis/:slug'
, [
@_
],
$options
);
}
Hide Show 11 lines of Pod
sub
delete_wiki_page {
my
$self
=
shift
;
croak
'delete_wiki_page must be called with 2 arguments'
if
@_
!= 2;
croak
'The #1 argument ($project_id) to delete_wiki_page must be a scalar'
if
ref
(
$_
[0]) or (!
defined
$_
[0]);
croak
'The #2 argument ($slug) to delete_wiki_page must be a scalar'
if
ref
(
$_
[1]) or (!
defined
$_
[1]);
my
$options
= {};
$options
->{decode} = 0;
$self
->_call_rest_client(
'DELETE'
,
'projects/:project_id/wikis/:slug'
, [
@_
],
$options
);
return
;
}
Hide Show 4 lines of Pod
1;
Hide Show 56 lines of Pod