From: Vincent Pit Date: Sun, 23 Aug 2009 23:08:24 +0000 (+0200) Subject: Style nits X-Git-Tag: v1.10~30 X-Git-Url: http://git.vpit.fr/?a=commitdiff_plain;h=60a9b6451a4c8abbda345cc99fa4fe1393a87299;p=perl%2Fmodules%2FTest-Valgrind.git Style nits --- diff --git a/lib/Test/Valgrind/Session.pm b/lib/Test/Valgrind/Session.pm index 95aaa01..f47e475 100644 --- a/lib/Test/Valgrind/Session.pm +++ b/lib/Test/Valgrind/Session.pm @@ -215,7 +215,9 @@ sub _run { if (not $self->no_def_supp) { my $def_supp = $self->def_supp_file; if (defined $def_supp and not -e $def_supp) { - $self->report(Test::Valgrind::Report->new_diag("Generating suppressions...")); + $self->report(Test::Valgrind::Report->new_diag( + "Generating suppressions..." + )); require Test::Valgrind::Suppressions; Test::Valgrind::Suppressions->generate( tool => $self->tool, @@ -223,7 +225,9 @@ sub _run { target => $def_supp, ); $self->_croak('Couldn\'t generate suppressions') unless -e $def_supp; - $self->report(Test::Valgrind::Report->new_diag("Suppressions for this perl stored in $def_supp")); + $self->report(Test::Valgrind::Report->new_diag( + "Suppressions for this perl stored in $def_supp" + )); } } push @supp_args, '--suppressions=' . $_ for $self->suppressions; @@ -310,7 +314,7 @@ sub do_suppressions { $_[0]->action->do_suppressions } =head2 C -Calls C<< ->action->report_class >> with the current session object as the sole argument. +Calls C<< ->action->report_class >> with the current session object as the unique argument. =cut