From 57071080087685e50ab6fd14a73b3bc93b79aa80 Mon Sep 17 00:00:00 2001
From: Daniel Nichter <daniel@percona.com>
Date: Wed, 12 Jun 2013 08:59:35 -0700
Subject: [PATCH] Don't decode server's error message yet since it seems not to
 work.

---
 bin/pt-agent | 12 +-----------
 1 file changed, 1 insertion(+), 11 deletions(-)

diff --git a/bin/pt-agent b/bin/pt-agent
index 02278592..c831a983 100755
--- a/bin/pt-agent
+++ b/bin/pt-agent
@@ -7294,17 +7294,7 @@ sub send_data {
       };
       if ( my $e = $EVAL_ERROR ) {
          if (blessed($e) && $e->isa('Percona::WebAPI::Exception::Request')) {
-            my $error_msg;
-            my $content = $client->response->content;
-            if ( $content ) {
-               my $errors = eval { decode_json($content); };
-               if ( $EVAL_ERROR ) {
-                  $error_msg = $content;
-               }
-               else {
-                  $error_msg = join("\n", ref($errors) eq 'ARRAY' ? @$errors : [$errors]);
-               }
-            }
+            my $error_msg = $client->response->content;
             $logger->warning('Error ' . $e->status . " sending $data_file: "
                . ($error_msg || '(No error message from server)'));
          }