diff options
2 files changed, 26 insertions, 0 deletions
diff --git a/perl/perl-Ogg-Vorbis-Header-PurePerl/eliminate_deprecated_use_of_array_as_reference_rt_cpan_org_96578.diff b/perl/perl-Ogg-Vorbis-Header-PurePerl/eliminate_deprecated_use_of_array_as_reference_rt_cpan_org_96578.diff new file mode 100644 index 000000000000..1811c35dae1b --- /dev/null +++ b/perl/perl-Ogg-Vorbis-Header-PurePerl/eliminate_deprecated_use_of_array_as_reference_rt_cpan_org_96578.diff @@ -0,0 +1,22 @@ +--- /home/jkeenan/Downloads/Ogg-Vorbis-Header-PurePerl-1.0/test.pl 2007-01-04 17:12:23.000000000 -0500 ++++ ./test.pl 2015-04-06 21:44:12.970890513 -0400 +@@ -19,16 +19,16 @@ + # 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); diff --git a/perl/perl-Ogg-Vorbis-Header-PurePerl/perl-Ogg-Vorbis-Header-PurePerl.SlackBuild b/perl/perl-Ogg-Vorbis-Header-PurePerl/perl-Ogg-Vorbis-Header-PurePerl.SlackBuild index a3823fbd009c..500ee14a78ba 100644 --- a/perl/perl-Ogg-Vorbis-Header-PurePerl/perl-Ogg-Vorbis-Header-PurePerl.SlackBuild +++ b/perl/perl-Ogg-Vorbis-Header-PurePerl/perl-Ogg-Vorbis-Header-PurePerl.SlackBuild @@ -52,6 +52,10 @@ find -L . \ \( -perm 666 -o -perm 664 -o -perm 600 -o -perm 444 -o -perm 440 -o -perm 400 \) \ -exec chmod 644 {} \; +# Fix for perl-5.22 +# https://rt.cpan.org/Public/Bug/Display.html?id=96578 +patch -p1 < $CWD/eliminate_deprecated_use_of_array_as_reference_rt_cpan_org_96578.diff + perl Makefile.PL \ PREFIX=/usr \ INSTALLDIRS=vendor \ |