Removed indirect object syntax from CompareWarnings.pm

This commit is contained in:
Brian Fraser
2011-12-23 00:09:56 -03:00
parent 37e321ef65
commit 29c1ea30cf

View File

@@ -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},