diff options
author | Stefano Lattarini <stefano.lattarini@gmail.com> | 2011-08-17 16:40:10 +0200 |
---|---|---|
committer | Stefano Lattarini <stefano.lattarini@gmail.com> | 2011-08-17 16:40:31 +0200 |
commit | be241ce3cc4fea3e9c3297221958cc8a358f091b (patch) | |
tree | f2455274ad668d1778e09d9b54a584e078a430ba /lib | |
parent | 081e90a8e51099a7513e77329eb604763f6f4df7 (diff) | |
download | automake-be241ce3cc4fea3e9c3297221958cc8a358f091b.tar.gz |
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.
Diffstat (limited to 'lib')
-rwxr-xr-x | lib/tap-driver.pl | 3 |
1 files changed, 1 insertions, 2 deletions
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; }, |