This is 1.19

[perl/modules/Test-Valgrind.git] / lib / Test / Valgrind / Parser / XML.pm

diff --git a/lib/Test/Valgrind/Parser/XML.pm b/lib/Test/Valgrind/Parser/XML.pm
index 3f4cdbebbcb8ceb1c71b391bf567d8cdd72d7b1f..d5755714852dc72bf36e57fd1e8ff817fddc48f1 100644 (file)
--- a/lib/Test/Valgrind/Parser/XML.pm
+++ b/lib/Test/Valgrind/Parser/XML.pm
@@ -9,11 +9,11 @@ Test::Valgrind::Parser::XML - Parse valgrind output as an XML stream.
 
 =head1 VERSION
 
-Version 1.10
+Version 1.19
 
 =cut
 
-our $VERSION = '1.10';
+our $VERSION = '1.19';
 
 =head1 DESCRIPTION
 
@@ -21,11 +21,13 @@ This is a base class for L<Test::Valgrind::Parser> objects that can parse C<valg
 
 =cut
 
-use base qw/Test::Valgrind::Parser/;
+use base qw<Test::Valgrind::Parser>;
 
 =head1 METHODS
 
-=head2 C<args $session, $fh>
+=head2 C<args>
+
+    my @args = $tvp->args($session, $fh);
 
 Returns the arguments needed to tell C<valgrind> to print in XML to the filehandle C<$fh>.
 
@@ -35,7 +37,7 @@ sub args {
  my $self = shift;
  my ($session, $fh) = @_;
 
- my $fd_opt = $session->version ge '3.5.0' ? '--xml-fd=' : '--log-fd=';
+ my $fd_opt = $session->version >= '3.5.0' ? '--xml-fd=' : '--log-fd=';
 
  return (
   $self->SUPER::args(@_),
@@ -67,7 +69,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,2016 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.