1 files changed, 59 insertions, 0 deletions
diff --git a/dev-perl/FileHandle-Unget/files/FileHandle-Unget-0.1634-no-authortest-generation.patch b/dev-perl/FileHandle-Unget/files/FileHandle-Unget-0.1634-no-authortest-generation.patch
new file mode 100644
index 000000000000..d215b12eb5a8
--- /dev/null
+++ b/dev-perl/FileHandle-Unget/files/FileHandle-Unget-0.1634-no-authortest-generation.patch
@@ -0,0 +1,59 @@
+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
+