From 29c1ea30cf5fc323684b032f455b5185e90d577d Mon Sep 17 00:00:00 2001
From: Brian Fraser <brian.fraser@percona.com>
Date: Fri, 23 Dec 2011 00:09:56 -0300
Subject: [PATCH] Removed indirect object syntax from CompareWarnings.pm

---
 lib/CompareWarnings.pm | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/lib/CompareWarnings.pm b/lib/CompareWarnings.pm
index 548247f6..eed501d9 100644
--- a/lib/CompareWarnings.pm
+++ b/lib/CompareWarnings.pm
@@ -321,7 +321,7 @@ sub _report_diff_warnings {
 
    return unless keys %{$self->{diffs}->{warnings}};
 
-   my $report = new ReportFormatter(extend_right => 1);
+   my $report = ReportFormatter->new(extend_right => 1);
    $report->set_title('New warnings');
    $report->set_columns(
       $args{query_id_col},
@@ -355,7 +355,7 @@ sub _report_diff_levels {
 
    return unless keys %{$self->{diffs}->{levels}};
 
-   my $report = new ReportFormatter(extend_right => 1);
+   my $report = ReportFormatter->new(extend_right => 1);
    $report->set_title('Warning level differences');
    $report->set_columns(
       $args{query_id_col},
@@ -391,7 +391,7 @@ sub _report_diff_warning_counts {
 
    return unless keys %{$self->{diffs}->{warning_counts}};
 
-   my $report = new ReportFormatter();
+   my $report = ReportFormatter->new();
    $report->set_title('Warning count differences');
    $report->set_columns(
       $args{query_id_col},