percona/percona-toolkit
1
0
Fork 0
mirror of https://github.com/percona/percona-toolkit.git synced 2025-09-11 13:40:07 +00:00
Code Issues Packages Projects Releases Wiki Activity

Always save response object in PWS client before returning or dying.

Browse Source
This commit is contained in:
Daniel Nichter
2013-05-10 12:15:34 -07:00
parent d001c6c492
commit 983af3b158
2 changed files with 4 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
bin/pt-agent
View File

@@ -1087,6 +1087,8 @@ sub _request {
my $response = $self->ua->request($req);
PTDEBUG && _d('Response', Dumper($response));
$self->response($response);
if ( !($response->code >= 200 && $response->code < 400) ) {
die Percona::WebAPI::Exception::Request->new(
method => $method,
@@ -1097,8 +1099,6 @@ sub _request {
);
}
$self->response($response);
return;
}

4
lib/Percona/WebAPI/Client.pm
View File

@@ -293,6 +293,8 @@ sub _request {
my $response = $self->ua->request($req);
PTDEBUG && _d('Response', Dumper($response));
$self->response($response);
if ( !($response->code >= 200 && $response->code < 400) ) {
die Percona::WebAPI::Exception::Request->new(
method => $method,
@@ -303,8 +305,6 @@ sub _request {
);
}
$self->response($response);
return;
}