From a042303a6e1858cf3b09062c4856eb0fff2ea3f9 Mon Sep 17 00:00:00 2001 From: Kent Fredric Date: Tue, 8 Sep 2020 20:51:31 +1200 Subject: Patch out generation of author tests --- inc/Module/Install/StandardTests.pm | 8 +++----- 1 file changed, 3 insertions(+), 5 deletions(-) diff --git a/inc/Module/Install/StandardTests.pm b/inc/Module/Install/StandardTests.pm index cd693ff..b565990 100644 --- a/inc/Module/Install/StandardTests.pm +++ b/inc/Module/Install/StandardTests.pm @@ -14,7 +14,7 @@ our $VERSION = '0.05'; sub use_standard_tests { my ($self, %specs) = @_; - my %with = map { $_ => 1 } qw/compile pod pod_coverage perl_critic/; + my %with = map { $_ => 1 } qw/compile/; if (exists $specs{without}) { $specs{without} = [ $specs{without} ] unless ref $specs{without}; delete $with{$_} for @{ $specs{without} }; @@ -27,9 +27,6 @@ sub use_standard_tests { $self->build_requires('Test::Compile'); $self->write_standard_test_compile; # no if; this is mandatory - $self->write_standard_test_pod if $with{pod}; - $self->write_standard_test_pod_coverage if $with{pod_coverage}; - $self->write_standard_test_perl_critic if $with{perl_critic}; } @@ -65,7 +62,6 @@ TEST $self->realclean_files($filename); } - sub write_standard_test_compile { my $self = shift; $self->write_test_file('000_standard__compile.t', q/ @@ -79,6 +75,7 @@ sub write_standard_test_compile { /); } +=cut sub write_standard_test_pod { my $self = shift; @@ -130,6 +127,7 @@ sub write_standard_test_perl_critic { /); } +=cut 1; -- 2.28.0