From bbe0416592a628b3b80991903a5b29dcb5962229 Mon Sep 17 00:00:00 2001 From: David Spencer Date: Wed, 2 Dec 2015 12:45:15 +0000 Subject: perl/perl-Ogg-Vorbis-Header-PurePerl: Fix build with perl-5.22. Signed-off-by: David Spencer Signed-off-by: Robby Workman --- ...se_of_array_as_reference_rt_cpan_org_96578.diff | 22 ++++++++++++++++++++++ 1 file changed, 22 insertions(+) create mode 100644 perl/perl-Ogg-Vorbis-Header-PurePerl/eliminate_deprecated_use_of_array_as_reference_rt_cpan_org_96578.diff (limited to 'perl/perl-Ogg-Vorbis-Header-PurePerl/eliminate_deprecated_use_of_array_as_reference_rt_cpan_org_96578.diff') 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 0000000000..1811c35dae --- /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); -- cgit v1.2.3