percona/percona-toolkit
1
0
Fork 0
mirror of https://github.com/percona/percona-toolkit.git synced 2025-09-15 16:00:23 +00:00
Code Issues Packages Projects Releases Wiki Activity

Removed indirect object syntax from CompareWarnings.pm

Browse Source
This commit is contained in:
Brian Fraser
2011-12-23 00:09:56 -03:00
parent 37e321ef65
commit 29c1ea30cf
1 changed files with 3 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
lib/CompareWarnings.pm
View File

@@ -321,7 +321,7 @@ sub _report_diff_warnings {
return unless keys %{$self->{diffs}->{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_title('New warnings');
$report->set_columns( $report->set_columns(
$args{query_id_col}, $args{query_id_col},
@@ -355,7 +355,7 @@ sub _report_diff_levels {
return unless keys %{$self->{diffs}->{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_title('Warning level differences');
$report->set_columns( $report->set_columns(
$args{query_id_col}, $args{query_id_col},
@@ -391,7 +391,7 @@ sub _report_diff_warning_counts {
return unless keys %{$self->{diffs}->{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_title('Warning count differences');
$report->set_columns( $report->set_columns(
$args{query_id_col}, $args{query_id_col},