You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
60 lines
1.6 KiB
60 lines
1.6 KiB
4 years ago
|
From a042303a6e1858cf3b09062c4856eb0fff2ea3f9 Mon Sep 17 00:00:00 2001
|
||
|
From: Kent Fredric <kentnl@gentoo.org>
|
||
|
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
|
||
|
|