From: Stefano Lattarini <stefano.lattarini@gmail.com>
Date: Wed, 17 Aug 2011 14:40:10 +0000 (+0200)
Subject: tap: a minor simplification in the perl TAP driver
X-Git-Tag: ng-0.5a~89^2~99^2~4
X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=be241ce3cc4fea3e9c3297221958cc8a358f091b;p=thirdparty%2Fautomake.git

tap: a minor simplification in the perl TAP driver

* lib/tap-driver.pl: The `--disable-hard-errors' option is a
no-op, so just ignore it and its argument.
---

diff --git a/ChangeLog b/ChangeLog
index 3fefbd39f..571218b43 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,9 @@
+2011-08-17  Stefano Lattarini  <stefano.lattarini@gmail.com>
+
+	tap: a minor simplification in the perl TAP driver
+	* lib/tap-driver.pl: The `--disable-hard-errors' option is a
+	no-op, so just ignore it and its argument.
+
 2011-08-17  Stefano Lattarini  <stefano.lattarini@gmail.com>
 
 	parallel-tests: fix help screen for test driver scripts
diff --git a/lib/tap-driver.pl b/lib/tap-driver.pl
index 6d42b2255..ed9913102 100755
--- a/lib/tap-driver.pl
+++ b/lib/tap-driver.pl
@@ -63,7 +63,6 @@ my $plan_seen = NO_PLAN;
 my %cfg = (
   "color-tests" => 0,
   "expect-failure" => 0,
-  "enable-hard-errors" => 1,
   "merge" => 0,
   "comments" => 0,
   "ignore-exit" => 0,
@@ -82,7 +81,7 @@ Getopt::Long::GetOptions (
     'trs-file=s' => \$trs_file,
     'color-tests=s'  => \&bool_opt,
     'expect-failure=s'  => \&bool_opt,
-    'enable-hard-errors=s' => \&bool_opt,
+    'enable-hard-errors=s' => sub {}, # No-op.
     'diagnostic-string=s' => \$diag_string,
     'comments' => sub { $cfg{"comments"} = 1; },
     'no-comments' => sub { $cfg{"comments"} = 0; },