In perl.git, the branch blead has been updated <http://perl5.git.perl.org/perl.git/commitdiff/e34fc33f2642e698df23a282ac508fe9214ea68a?hp=19f0376bf31cf7293df81a372d93433a0b573dd6>
- Log ----------------------------------------------------------------- commit e34fc33f2642e698df23a282ac508fe9214ea68a Author: James E Keenan <[email protected]> Date: Thu Dec 29 21:25:22 2016 -0500 perldelta for commit 3e736f1def24bdc1982c2d308a5d3ca4a6f47313 M pod/perldelta.pod commit 3e736f1def24bdc1982c2d308a5d3ca4a6f47313 Author: Paul Marquess <[email protected]> Date: Thu Dec 29 21:23:32 2016 -0500 Upgrade Compress-Raw-Bzip2 to CPAN version 2.070. M Porting/Maintainers.pl M cpan/Compress-Raw-Bzip2/Bzip2.xs M cpan/Compress-Raw-Bzip2/bzip2-src/compress.c M cpan/Compress-Raw-Bzip2/lib/Compress/Raw/Bzip2.pm M cpan/Compress-Raw-Bzip2/t/000prereq.t ----------------------------------------------------------------------- Summary of changes: Porting/Maintainers.pl | 2 +- cpan/Compress-Raw-Bzip2/Bzip2.xs | 4 ++-- cpan/Compress-Raw-Bzip2/bzip2-src/compress.c | 2 +- cpan/Compress-Raw-Bzip2/lib/Compress/Raw/Bzip2.pm | 8 ++++---- cpan/Compress-Raw-Bzip2/t/000prereq.t | 2 +- pod/perldelta.pod | 4 ++++ 6 files changed, 13 insertions(+), 9 deletions(-) diff --git a/Porting/Maintainers.pl b/Porting/Maintainers.pl index e0935d2d10..723928e9dc 100755 --- a/Porting/Maintainers.pl +++ b/Porting/Maintainers.pl @@ -206,7 +206,7 @@ use File::Glob qw(:case); }, 'Compress::Raw::Bzip2' => { - 'DISTRIBUTION' => 'PMQS/Compress-Raw-Bzip2-2.069.tar.gz', + 'DISTRIBUTION' => 'PMQS/Compress-Raw-Bzip2-2.070.tar.gz', 'FILES' => q[cpan/Compress-Raw-Bzip2], 'EXCLUDED' => [ qr{^t/Test/}, diff --git a/cpan/Compress-Raw-Bzip2/Bzip2.xs b/cpan/Compress-Raw-Bzip2/Bzip2.xs index e47dbae853..b4e9ab5549 100644 --- a/cpan/Compress-Raw-Bzip2/Bzip2.xs +++ b/cpan/Compress-Raw-Bzip2/Bzip2.xs @@ -558,7 +558,7 @@ bzclose(s, output) if (DO_UTF8(output) && !sv_utf8_downgrade(output, 1)) croak("Wide character in " COMPRESS_CLASS "::bzclose input parameter"); #endif - if(! s->flags & FLAG_APPEND_OUTPUT) { + if((s->flags & FLAG_APPEND_OUTPUT) != FLAG_APPEND_OUTPUT) { SvCUR_set(output, 0); /* sv_setpvn(output, "", 0); */ } @@ -619,7 +619,7 @@ bzflush(s, output) if (DO_UTF8(output) && !sv_utf8_downgrade(output, 1)) croak("Wide character in " COMPRESS_CLASS "::bzflush input parameter"); #endif - if(! s->flags & FLAG_APPEND_OUTPUT) { + if((s->flags & FLAG_APPEND_OUTPUT) != FLAG_APPEND_OUTPUT) { SvCUR_set(output, 0); /* sv_setpvn(output, "", 0); */ } diff --git a/cpan/Compress-Raw-Bzip2/bzip2-src/compress.c b/cpan/Compress-Raw-Bzip2/bzip2-src/compress.c index 522e06ae04..07330787ce 100644 --- a/cpan/Compress-Raw-Bzip2/bzip2-src/compress.c +++ b/cpan/Compress-Raw-Bzip2/bzip2-src/compress.c @@ -353,7 +353,7 @@ void sendMTFValues ( EState* s ) Calculate the cost of this group as coded by each of the coding tables. --*/ - for (t = 0; t < nGroups; t++) cost[t] = 0; + for (t = 0; t < BZ_N_GROUPS; t++) cost[t] = 0; if (nGroups == 6 && 50 == ge-gs+1) { /*--- fast track the common case ---*/ diff --git a/cpan/Compress-Raw-Bzip2/lib/Compress/Raw/Bzip2.pm b/cpan/Compress-Raw-Bzip2/lib/Compress/Raw/Bzip2.pm index d9e25bde1f..0d806b969b 100644 --- a/cpan/Compress-Raw-Bzip2/lib/Compress/Raw/Bzip2.pm +++ b/cpan/Compress-Raw-Bzip2/lib/Compress/Raw/Bzip2.pm @@ -11,7 +11,7 @@ use Carp ; use bytes ; our ($VERSION, $XS_VERSION, @ISA, @EXPORT, $AUTOLOAD); -$VERSION = '2.069'; +$VERSION = '2.070'; $XS_VERSION = $VERSION; $VERSION = eval $VERSION; @@ -364,13 +364,13 @@ L<File::GlobMapper|File::GlobMapper>, L<Archive::Zip|Archive::Zip>, L<Archive::Tar|Archive::Tar>, L<IO::Zlib|IO::Zlib> -The primary site for the bzip2 program is F<http://www.bzip.org>. +The primary site for the bzip2 program is L<http://www.bzip.org>. See the module L<Compress::Bzip2|Compress::Bzip2> =head1 AUTHOR -This module was written by Paul Marquess, F<[email protected]>. +This module was written by Paul Marquess, C<[email protected]>. =head1 MODIFICATION HISTORY @@ -378,7 +378,7 @@ See the Changes file. =head1 COPYRIGHT AND LICENSE -Copyright (c) 2005-2015 Paul Marquess. All rights reserved. +Copyright (c) 2005-2016 Paul Marquess. All rights reserved. This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself. diff --git a/cpan/Compress-Raw-Bzip2/t/000prereq.t b/cpan/Compress-Raw-Bzip2/t/000prereq.t index ebe0f50efb..63945c3038 100644 --- a/cpan/Compress-Raw-Bzip2/t/000prereq.t +++ b/cpan/Compress-Raw-Bzip2/t/000prereq.t @@ -19,7 +19,7 @@ BEGIN if eval { require Test::NoWarnings ; import Test::NoWarnings; 1 }; - my $VERSION = '2.069'; + my $VERSION = '2.070'; my @NAMES = qw( ); diff --git a/pod/perldelta.pod b/pod/perldelta.pod index 0d8870d0e0..b94df2ec69 100644 --- a/pod/perldelta.pod +++ b/pod/perldelta.pod @@ -135,6 +135,10 @@ L<B::Xref> has been upgraded from version 1.05 to 1.06. =item * +L<Compress::Raw::Bzip2> has been upgraded from version 2.069 to 2.070. + +=item * + L<Compress::Raw::Zlib> has been upgraded from version 2.069 to 2.070. =item * -- Perl5 Master Repository
