From 7e4b1def6a96c61cfb62b220ded41a5ecfb7201b Mon Sep 17 00:00:00 2001
From: Brian Fraser <brian.fraser@percona.com>
Date: Fri, 23 Dec 2011 00:34:47 -0300
Subject: [PATCH] Removed indirect object syntax from PgLogParser.pm

---
 lib/PgLogParser.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lib/PgLogParser.pm b/lib/PgLogParser.pm
index 9aa62d17..7f3f2f37 100644
--- a/lib/PgLogParser.pm
+++ b/lib/PgLogParser.pm
@@ -615,7 +615,7 @@ sub generate_wrappers {
    if ( ($self->{sanity} || '') ne "$args{next_event}" ){
       MKDEBUG && _d("Clearing and recreating internal state");
       eval { require SysLogParser; }; # Required for tests to work.
-      my $sl = new SysLogParser();
+      my $sl = SysLogParser->new();
 
       # We need a special item in %args for syslog parsing.  (This might not be
       # a syslog log file...)  See the test for t/samples/pg-syslog-002.txt for