summaryrefslogtreecommitdiffstats
path: root/gnu/usr.bin/perl/cpan/Test-Harness/lib/App/Prove.pm
diff options
context:
space:
mode:
authorafresh1 <afresh1@openbsd.org>2019-02-13 21:15:00 +0000
committerafresh1 <afresh1@openbsd.org>2019-02-13 21:15:00 +0000
commit9f11ffb7133c203312a01e4b986886bc88c7d74b (patch)
tree6618511204c614b20256e4ef9dea39a7b311d638 /gnu/usr.bin/perl/cpan/Test-Harness/lib/App/Prove.pm
parentImport perl-5.28.1 (diff)
downloadwireguard-openbsd-9f11ffb7133c203312a01e4b986886bc88c7d74b.tar.xz
wireguard-openbsd-9f11ffb7133c203312a01e4b986886bc88c7d74b.zip
Fix merge issues, remove excess files - match perl-5.28.1 dist
looking good sthen@, Great! bluhm@
Diffstat (limited to 'gnu/usr.bin/perl/cpan/Test-Harness/lib/App/Prove.pm')
-rw-r--r--gnu/usr.bin/perl/cpan/Test-Harness/lib/App/Prove.pm10
1 files changed, 6 insertions, 4 deletions
diff --git a/gnu/usr.bin/perl/cpan/Test-Harness/lib/App/Prove.pm b/gnu/usr.bin/perl/cpan/Test-Harness/lib/App/Prove.pm
index 32eb59c2a5c..9298726d24f 100644
--- a/gnu/usr.bin/perl/cpan/Test-Harness/lib/App/Prove.pm
+++ b/gnu/usr.bin/perl/cpan/Test-Harness/lib/App/Prove.pm
@@ -18,11 +18,11 @@ App::Prove - Implements the C<prove> command.
=head1 VERSION
-Version 3.36
+Version 3.42
=cut
-our $VERSION = '3.36_01';
+our $VERSION = '3.42';
=head1 DESCRIPTION
@@ -59,6 +59,7 @@ BEGIN {
verbose warnings_fail warnings_warn show_help show_man show_version
state_class test_args state dry extensions ignore_exit rules state_manager
normalize sources tapversion trap
+ statefile
);
__PACKAGE__->mk_methods(@ATTR);
}
@@ -229,6 +230,7 @@ sub process_args {
'M=s@' => $self->{modules},
'P=s@' => $self->{plugins},
'state=s@' => $self->{state},
+ 'statefile=s' => \$self->{statefile},
'directives' => \$self->{directives},
'h|help|?' => \$self->{show_help},
'H|man' => \$self->{show_man},
@@ -279,7 +281,7 @@ sub _help {
sub _color_default {
my $self = shift;
- return -t STDOUT && !$ENV{HARNESS_NOTTY} && !IS_WIN32;
+ return -t STDOUT && !$ENV{HARNESS_NOTTY};
}
sub _get_args {
@@ -479,7 +481,7 @@ sub run {
unless ( $self->state_manager ) {
$self->state_manager(
- $self->state_class->new( { store => STATE_FILE } ) );
+ $self->state_class->new( { store => $self->statefile || STATE_FILE } ) );
}
if ( $self->show_help ) {