dev-perl/Ogg-Vorbis-Header-PurePerl: Fix test failure re bug #623060

- EAPI6
- Fix tests failing on newer perls
- add USE=examples
- Avoid installing ogginfo.pl by default

Bug: https://bugs.gentoo.org/623060
Package-Manager: Portage-2.3.18, Repoman-2.3.6

2 files changed, 68 insertions, 0 deletions

diff --git a/dev-perl/Ogg-Vorbis-Header-PurePerl/files/Ogg-Vorbis-Header-PurePerl-1.0-example-ogginfo.patch b/dev-perl/Ogg-Vorbis-Header-PurePerl/files/Ogg-Vorbis-Header-PurePerl-1.0-example-ogginfo.patch
new file mode 100644
index 000000000000..c7517a5fa1db
--- /dev/null
+++ b/dev-perl/Ogg-Vorbis-Header-PurePerl/files/Ogg-Vorbis-Header-PurePerl-1.0-example-ogginfo.patch
@@ -0,0 +1,30 @@
+From 51fb5b08f1a5a12d1de0c87921c0eb9f1fad6aa5 Mon Sep 17 00:00:00 2001
+From: Kent Fredric <kentnl@gentoo.org>
+Date: Wed, 20 Dec 2017 19:46:31 +1300
+Subject: Move ogginfo.pl to examples, not standard install
+
+---
+ MANIFEST                          | 2 +-
+ ogginfo.pl => examples/ogginfo.pl | 0
+ 2 files changed, 1 insertion(+), 1 deletion(-)
+ rename ogginfo.pl => examples/ogginfo.pl (100%)
+
+diff --git a/MANIFEST b/MANIFEST
+index f2d38fe..b87398a 100644
+--- a/MANIFEST
++++ b/MANIFEST
+@@ -5,6 +5,6 @@ PurePerl.pm
+ README
+ test.pl
+ test.ogg
+-ogginfo.pl
++examples/ogginfo.pl
+ LICENSE.GPL
+ META.yml                                 Module meta-data (added by MakeMaker)
+diff --git a/ogginfo.pl b/examples/ogginfo.pl
+similarity index 100%
+rename from ogginfo.pl
+rename to examples/ogginfo.pl
+-- 
+2.15.1
+
diff --git a/dev-perl/Ogg-Vorbis-Header-PurePerl/files/Ogg-Vorbis-Header-PurePerl-1.0-test-array-ref.patch b/dev-perl/Ogg-Vorbis-Header-PurePerl/files/Ogg-Vorbis-Header-PurePerl-1.0-test-array-ref.patch
new file mode 100644
index 000000000000..637def07f70f
--- /dev/null
+++ b/dev-perl/Ogg-Vorbis-Header-PurePerl/files/Ogg-Vorbis-Header-PurePerl-1.0-test-array-ref.patch
@@ -0,0 +1,38 @@
+From e7c90043efe460ce33d980482b383ef095576247 Mon Sep 17 00:00:00 2001
+From: James E Keenan <jkeenan@cpan.org>
+Date: Mon, 6 Apr 2015 21:44:12 -0400
+Subject: Eliminate deprecated use of array as reference
+
+Bug: https://rt.cpan.org/Public/Bug/Display.html?id=96578
+Bug: https://bugs.gentoo.org/623060
+---
+ test.pl | 6 +++---
+ 1 file changed, 3 insertions(+), 3 deletions(-)
+
+diff --git a/test.pl b/test.pl
+index 365bef9..867e05e 100755
+--- a/test.pl
++++ b/test.pl
+@@ -19,16 +19,16 @@ ok(my $ogg = Ogg::Vorbis::Header::PurePerl->new('test.ogg'));
+ # Try all the routines
+ ok($ogg->info->{'rate'} == 44100);
+ ok($ogg->comment_tags);
+-ok(@{$ogg->comment('artist')}->[0] == 'maloi');
++ok($ogg->comment('artist')->[0] == 'maloi');
+ 
+ $ogg = 0;
+ 
+ # See if full load works
+ ok(my $ogg = Ogg::Vorbis::Header::PurePerl->new('test.ogg'));
+-ok(@{$ogg->comment('artist')}->[0] == 'maloi');
++ok($ogg->comment('artist')->[0] == 'maloi');
+ 
+ # and see if we can get comments including the '=' character
+-ok(@{$ogg->comment('album')}->[0] == 'this=that');
++ok($ogg->comment('album')->[0] == 'this=that');
+ 
+ # Make sure we're getting the right track length
+ ok($ogg->info->{'length'} == 0);
+-- 
+2.15.1
+