UA->new(ua => $self->ua);
},
);
has json => (
is => 'lazy',
isa => Object,
default => sub {
load JSON::MaybeXS;
JSON::MaybeXS->new(utf8 => 1);
},
);
ha
args->{url});
my %options;
$options{headers}{Accept} = '*/*;q=0.2,application/json'; # prefer json response
$self->_call_add_authorization($args, \%options);
# request body
my $data = $args->{data};
my $data_type = $args->{data_type} || 'application/json';
if ($data) {
if ($method eq 'GET' || $method eq 'HEAD') {
my $params = ref($
ey}/repos/{repositorySlug}
Responses:
=over 4
=item * C<<< 200 >>> - status, type: application/json
The updated synchronization status for the repository, after enabling
synchronization. 204 NO CO
0 >>> - errors, type: application/json
The JSON payload for the request did not define the "enabled" property.
=item * C<<< 401 >>> - errors, type: application/json
The currently authenticated user
nage
synchronization in the specified repository.
=item * C<<< 204 >>> - data, type: application/json
Synchronization has successfully been disabled. 200 OK, with updated status
information, is retu
over 4
=item * C<<< 200 >>> - data, type: application/json
Information about the cluster
=item * C<<< 401 >>> - errors, type: application/json
The currently authenticated user has insufficient per
es:
=over 4
=item * C<<< 200 >>> - page, type: application/json
A page of groups.
=item * C<<< 401 >>> - errors, type: application/json
The currently authenticated user is not a licensed user.
=
pe: application/json
The newly created group.
=item * C<<< 400 >>> - errors, type: application/json
The request was malformed.
=item * C<<< 401 >>> - errors, type: application/json
The currently
tem * C<<< 201 >>> - data, type: application/json
a JSON representation of the newly created branch
=item * C<<< 400 >>> - errors, type: application/json
the branch was not created because the requ
, or was not a valid ref name in the
repository
=item * C<<< 401 >>> - errors, type: application/json
The currently authenticated user has insufficient permissions to create a
branch. This could be
/{repositorySlug}/branches
Responses:
=over 4
=item * C<<< 400 >>> - errors, type: application/json
the branch was not deleted because the request was invalid, e.g. no ref name
to delete was provi
C<<< 200 >>> - pullRequest, type: application/json
The rebaseability status of the pull request.
=item * C<<< 401 >>> - errors, type: application/json
The currently authenticated user has insuffic
permissions to view the
specified pull request.
=item * C<<< 404 >>> - errors, type: application/json
The specified repository or pull request does not exist.
=back
=head2 rebase
Rebases the spec
4
=item * C<<< 200 >>> - pullRequest, type: application/json
The merged pull request.
=item * C<<< 401 >>> - errors, type: application/json
The currently authenticated user has insufficient permi
=over 4
=item * C<<< 200 >>> - data, type: application/json
The newly created access key
=item * C<<< 400 >>> - errors, type: application/json
The current request contains invalid or missing value
missions to add an access
key to the repository
=item * C<<< 404 >>> - errors, type: application/json
The specified repository does not exist
=back
=head2 get_keys_for_repository
Retrieves the ac
item * C<<< 200 >>> - page, type: application/json
A single page of access keys for the repository.
=item * C<<< 401 >>> - errors, type: application/json
The currently authenticated user has insuff
er 4
=item * C<<< 200 >>> - page, type: application/json
The audit events for this project
=item * C<<< 401 >>> - errors, type: application/json
The currently authenticated user has insufficient p
ermissions to administer the
project.
=item * C<<< 404 >>> - errors, type: application/json
The specified project does not exist.
=back
=head2 get_events_for_repository
Retrieve the subset of aud
r 4
=item * C<<< 200 >>> - page, type: application/json
The audit events for this repository
=item * C<<< 401 >>> - errors, type: application/json
The currently authenticated user has insufficient
=~ /json/) {
$body = $self->json->decode($body);
}
return $body;
}
has json => (
is => 'lazy',
isa => Object,
default => sub {
shift->context->json ||
do {
require JSON::MaybeXS;
JSON::MaybeXS->new(utf8 => 1);
};
},
);
sub is_success { shift->raw->{success} }
sub status { shift->raw->{status} }
sub erro
=> $self->raw,
decoded_content => $self->data->{$field},
json => $self->json,
);
}
1;
__END__
=pod
=encoding UTF-8
=head1 NAME
WebService::BitbucketSer
* C<<< 400 >>> - errors, type: application/json
The currently authenticated user is the comment author
=item * C<<< 401 >>> - errors, type: application/json
The currently authenticated user does no
response indicating that the request succeeded
=item * C<<< 404 >>> - errors, type: application/json
The specified repository, commit or comment does not exist
=back
=head2 get_commit_likers
Get
=item * C<<< 200 >>> - data, type: application/json
Page of users who liked the specified comment
=item * C<<< 401 >>> - errors, type: application/json
The currently authenticated user does not hav
Responses:
=over 4
=item * C<<< 200 >>> - page, type: application/json
=item * C<<< 404 >>> - not-found, type: application/json
The restriction could not be found.
=back
=head2 create_restricti
00 >>> - restriction, type: application/json
Response contains the ref restriction that was just created.
=item * C<<< 400 >>> - errors, type: application/json
The request has failed validation.
=
item * C<<< 401 >>> - validation, type: application/json
The currently authenticated user has insufficient permissions to perform this operation.
=back
=head2 delete_restriction_for_repository
Del
ild-status/1.0/commits/stats
Responses:
=over 4
=item * C<<< 200 >>> - data, type: application/json
The number of successful/failed/in-progress builds for each commit
(with the caveat that the com
h
them >>> will not be present in the response)
=item * C<<< 401 >>> - errors, type: application/json
The user is not authenticated or does not have the B<<< LICENSED >>> permission.
=back
=head2
<< 200 >>> - data, type: application/json
The number of successful/failed/in-progress builds for the commit
=item * C<<< 401 >>> - errors, type: application/json
The user is not authenticated or do
authenticated user.
=back
Responses:
=over 4
=item * C<<< 401 >>> - errors, type: application/json
The currently authenticated user has insufficient permissions
to delete the GPG keys. This is on
tching the supplied B<<< user >>> were deleted.
=item * C<<< 404 >>> - errors, type: application/json
No user matches the supplied B<<< user >>>
=back
=head2 get_keys
Find all the keys for the cu
k
Responses:
=over 4
=item * C<<< 200 >>> - page, type: application/json
=item * C<<< 401 >>> - errors, type: application/json
The currently authenticated user has insufficient permissions to per
<< REPO_READ >>> permission for the repository containing the comment
to call this resource.
The JSON structure for the create issue format is specified by Jira's REST v2 API.
POST jira/1.0/comm
* C<<< 201 >>> - data, type: application/json
The created Jira issue key and the associated comment ID
=item * C<<< 400 >>> - errors, type: application/json
The specified application link ID does
not match any linked Jira instance.
=item * C<<< 401 >>> - errors, type: application/json
Authentication with the Jira instance is required.
=back
=head2 get_commits
Retrieve a page of changesets
C<<< 200 >>> - data, type: application/json
The default reviewer pull request condition that was created.
=item * C<<< 400 >>> - data, type: application/json
The request was malformed
=back
=hea
tem * C<<< 200 >>> - data, type: application/json
The updated default reviewer pull request condition.
=item * C<<< 400 >>> - data, type: application/json
The request was malformed
=back
=head2 g
ects/{projectKey}/conditions
Responses:
=over 4
=item * C<<< 200 >>> - data, type: application/json
The default reviewer pull request conditions associated with the given project
=back
=head2 cr
204 >>> - data, type: application/json
an empty response indicating that the user setting has been updated
=item * C<<< 404 >>> - not-found, type: application/json
The mirror could not be found.
over 4
=item * C<<< 200 >>> - data, type: application/json
the preferred mirror server
=item * C<<< 404 >>> - not-found, type: application/json
The user's preferred mirror server could not be foun
nt/settings/preferred-mirror
Responses:
=over 4
=item * C<<< 204 >>> - data, type: application/json
an empty response indicating that the user setting has been updated
=back
=head2 get_analytics
>>> - accessToken, type: application/json
A response containing the raw access token and associated details
=item * C<<< 400 >>> - errors, type: application/json
One of the following error cases oc
ready has their maximum number of tokens
=back
=item * C<<< 401 >>> - errors, type: application/json
The currently authenticated user is not permitted to create an access token on
behalf of this us
>> - accessToken, type: application/json
A response containing a page of access tokens and associated details
=item * C<<< 401 >>> - errors, type: application/json
The currently authenticated user
my $formatted = eval {
require JSON::MaybeXS;
my $json = JSON::MaybeXS->new(canonical => 1, pretty => 1, utf8 => 1);
$json->encode($json->decode($text));
} || $text;