From fe50f5d916d465924e8b783c5eb3e03aa2bfd947 Mon Sep 17 00:00:00 2001
From: Daniel Nichter <daniel@percona.com>
Date: Fri, 17 May 2013 09:47:36 -0700
Subject: [PATCH] Fix type: _message_queue, not message_queue.

---
 bin/pt-agent                | 2 +-
 lib/Percona/Agent/Logger.pm | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/bin/pt-agent b/bin/pt-agent
index bf1bf62f..503592fc 100755
--- a/bin/pt-agent
+++ b/bin/pt-agent
@@ -4858,7 +4858,7 @@ sub BUILD {
             while (    $self->_message_queue
                     && $self->_message_queue->pending()
                     && $max_log_entries--
-                    && (my $entry = $self->message_queue->dequeue()) )
+                    && (my $entry = $self->_message_queue->dequeue()) )
             {
                $oktorun = 0 if !defined $entry;
                push @log_entries, Percona::WebAPI::Resource::LogEntry->new(
diff --git a/lib/Percona/Agent/Logger.pm b/lib/Percona/Agent/Logger.pm
index ff4eae48..c5d8720d 100644
--- a/lib/Percona/Agent/Logger.pm
+++ b/lib/Percona/Agent/Logger.pm
@@ -87,7 +87,7 @@ sub BUILD {
             while (    $self->_message_queue
                     && $self->_message_queue->pending()
                     && $max_log_entries--
-                    && (my $entry = $self->message_queue->dequeue()) )
+                    && (my $entry = $self->_message_queue->dequeue()) )
             {
                $oktorun = 0 if !defined $entry;
                # $event = [ level, "message" ]