diff options
| author |   David Spencer | 2015-12-02 13:45:15 +0100 |
|---|---|---|
| committer |   Willy Sudiarto Raharjo | 2016-01-17 03:40:16 +0100 |
| commit | bbe0416592a628b3b80991903a5b29dcb5962229 (patch) | |
| tree | aa87b196c886a9e8748d1e7114bc08d818f3ece7 /perl/perl-Ogg-Vorbis-Header-PurePerl/eliminate_deprecated_use_of_array_as_reference_rt_cpan_org_96578.diff | |
| parent | c098292a90ca586f4b1c2a5fd66d034039d9565e (diff) | |
| download | slackbuilds-bbe0416592a628b3b80991903a5b29dcb5962229.tar.gz | |
perl/perl-Ogg-Vorbis-Header-PurePerl: Fix build with perl-5.22.
Signed-off-by: David Spencer <baildon.research@googlemail.com>
Signed-off-by: Robby Workman <rworkman@slackbuilds.org>
Diffstat (limited to 'perl/perl-Ogg-Vorbis-Header-PurePerl/eliminate_deprecated_use_of_array_as_reference_rt_cpan_org_96578.diff')
| -rw-r--r-- | perl/perl-Ogg-Vorbis-Header-PurePerl/eliminate_deprecated_use_of_array_as_reference_rt_cpan_org_96578.diff | 22 |
1 files changed, 22 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 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); |