From: Stefano Lattarini <stefano.lattarini@gmail.com>
Date: Wed, 7 Sep 2011 15:31:23 +0000 (+0200)
Subject: tap/perl: be more portable to older TAP::Parser versions
X-Git-Tag: ng-0.5a~89^2~70^2~1
X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=858f4d6803b22c3595eb55c62cf2b3f087a32a48;p=thirdparty%2Fautomake.git

tap/perl: be more portable to older TAP::Parser versions

* lib/tap-driver.pl (start): Do not call the `ignore_exit' method
on our TAP parser: it is not supported in older TAP::Parser
versions (e.g., 3.10), and is not really required by our usage of
the parser object.
---

diff --git a/ChangeLog b/ChangeLog
index 50d458c1e..675e58024 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,11 @@
+2011-09-07  Stefano Lattarini  <stefano.lattarini@gmail.com>
+
+	tap/perl: be more portable to older TAP::Parser versions
+	* lib/tap-driver.pl (start): Do not call the `ignore_exit' method
+	on our TAP parser: it is not supported in older TAP::Parser
+	versions (e.g., 3.10), and is not really required by our usage of
+	the parser object.
+
 2011-09-06  Stefano Lattarini  <stefano.lattarini@gmail.com>
 
 	tests: fix spurious failures due to ignored signals
diff --git a/lib/tap-driver.pl b/lib/tap-driver.pl
index 2c328d99a..dac9f3c59 100755
--- a/lib/tap-driver.pl
+++ b/lib/tap-driver.pl
@@ -32,7 +32,7 @@ use strict;
 use Getopt::Long ();
 use TAP::Parser;
 
-my $VERSION = '2011-08-25.10'; # UTC
+my $VERSION = '2011-09-07.15'; # UTC
 
 my $ME = "tap-driver.pl";
 
@@ -257,7 +257,6 @@ sub start (@)
   open STDOUT, ">&LOG" or die "$ME: redirecting stdout: $!\n";
   open STDERR, ">&LOG" or die "$ME: redirecting stderr: $!\n";
   $parser = TAP::Parser->new ({ exec => \@_, merge => $cfg{merge} });
-  $parser->ignore_exit(1) if $cfg{"ignore-exit"};
 }
 
 sub get_test_exit_message ()