]> git.vpit.fr Git - perl/modules/Test-Valgrind.git/blobdiff - lib/Test/Valgrind/Action/Test.pm
This is 1.17
[perl/modules/Test-Valgrind.git] / lib / Test / Valgrind / Action / Test.pm
index 316bb3542facd1770edf36ccf075f9bfde0a94d5..c0c2644f91425acd3ae7fd476a7fb58757ff95a3 100644 (file)
@@ -9,11 +9,11 @@ Test::Valgrind::Action::Test - Test that an analysis didn't generate any error r
 
 =head1 VERSION
 
-Version 1.12
+Version 1.17
 
 =cut
 
-our $VERSION = '1.12';
+our $VERSION = '1.17';
 
 =head1 DESCRIPTION
 
@@ -23,13 +23,19 @@ This action uses C<Test::Builder> to plan and pass or fail tests according to th
 
 use Test::Builder;
 
-use base qw/Test::Valgrind::Action Test::Valgrind::Action::Captor/;
+use base qw<Test::Valgrind::Action Test::Valgrind::Action::Captor>;
 
 =head1 METHODS
 
 This class inherits L<Test::Valgrind::Action> and L<Test::Valgrind::Action::Captor>.
 
-=head2 C<< new diag => $diag, extra_tests => $extra_tests, ... >>
+=head2 C<new>
+
+    my $tvat = Test::Valgrind::Action::Test->new(
+     diag        => $diag,
+     extra_tests => $extra_tests,
+     %extra_args,
+    );
 
 Your usual constructor.
 
@@ -60,6 +66,8 @@ sub new {
 
 =head2 C<diag>
 
+    my $diag = $tvat->diag;
+
 Read-only accessor for the C<diag> option.
 
 =cut
@@ -68,6 +76,8 @@ sub diag { $_[0]->{diag} }
 
 =head2 C<kinds>
 
+    my @kinds = $tvat->kinds;
+
 Returns the list of all the monitored report kinds.
 
 =cut
@@ -158,7 +168,7 @@ sub finish {
   seek $fh, $self->{capture_pos}, 0;
   $tb->diag($_) while <$fh>;
   close $fh or $self->_croak('close(capture[' . fileno($fh) . "]): $!");
-  delete @{$self}{qw/capture capture_pos/};
+  delete @{$self}{qw<capture capture_pos>};
  }
 
  my $failed = 0;
@@ -211,7 +221,7 @@ You can find documentation for this module with the perldoc command.
 
 =head1 COPYRIGHT & LICENSE
 
-Copyright 2009 Vincent Pit, all rights reserved.
+Copyright 2009,2010,2011,2013,2015 Vincent Pit, all rights reserved.
 
 This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.