In perl.git, the branch blead has been updated <http://perl5.git.perl.org/perl.git/commitdiff/19f0376bf31cf7293df81a372d93433a0b573dd6?hp=9637d2a524bfab39fd1e4cbf27b8f632a8265e9e>
- Log ----------------------------------------------------------------- commit 19f0376bf31cf7293df81a372d93433a0b573dd6 Author: James E Keenan <[email protected]> Date: Thu Dec 29 16:56:32 2016 -0500 perldelta for commit 182b56428366fc161308e7f68a46142f1e566eaf M pod/perldelta.pod commit 9d99027858588965e9a07a36b0ad55fa4d483782 Author: Paul Marquess <[email protected]> Date: Thu Dec 29 16:53:43 2016 -0500 Upgrade Compress-Raw-Zlib to CPAN version 2.070. M Porting/Maintainers.pl M cpan/Compress-Raw-Zlib/Zlib.xs M cpan/Compress-Raw-Zlib/lib/Compress/Raw/Zlib.pm M cpan/Compress-Raw-Zlib/zlib-src/inflate.c ----------------------------------------------------------------------- Summary of changes: Porting/Maintainers.pl | 2 +- cpan/Compress-Raw-Zlib/Zlib.xs | 2 +- cpan/Compress-Raw-Zlib/lib/Compress/Raw/Zlib.pm | 18 +++++++++--------- cpan/Compress-Raw-Zlib/zlib-src/inflate.c | 2 +- pod/perldelta.pod | 4 ++++ 5 files changed, 16 insertions(+), 12 deletions(-) diff --git a/Porting/Maintainers.pl b/Porting/Maintainers.pl index 5050e22524..e0935d2d10 100755 --- a/Porting/Maintainers.pl +++ b/Porting/Maintainers.pl @@ -217,7 +217,7 @@ use File::Glob qw(:case); }, 'Compress::Raw::Zlib' => { - 'DISTRIBUTION' => 'PMQS/Compress-Raw-Zlib-2.069.tar.gz', + 'DISTRIBUTION' => 'PMQS/Compress-Raw-Zlib-2.070.tar.gz', 'FILES' => q[cpan/Compress-Raw-Zlib], 'EXCLUDED' => [ diff --git a/cpan/Compress-Raw-Zlib/Zlib.xs b/cpan/Compress-Raw-Zlib/Zlib.xs index 664c26c60c..d379f7872d 100644 --- a/cpan/Compress-Raw-Zlib/Zlib.xs +++ b/cpan/Compress-Raw-Zlib/Zlib.xs @@ -1088,7 +1088,7 @@ flush(s, output, f=Z_FINISH) if (DO_UTF8(output) && !sv_utf8_downgrade(output, 1)) croak("Wide character in Compress::Raw::Zlib::Deflate::flush input parameter"); #endif - if(! s->flags & FLAG_APPEND) { + if((s->flags & FLAG_APPEND) != FLAG_APPEND) { SvCUR_set(output, 0); /* sv_setpvn(output, "", 0); */ } diff --git a/cpan/Compress-Raw-Zlib/lib/Compress/Raw/Zlib.pm b/cpan/Compress-Raw-Zlib/lib/Compress/Raw/Zlib.pm index 59a6100ebf..175462ff6c 100644 --- a/cpan/Compress-Raw-Zlib/lib/Compress/Raw/Zlib.pm +++ b/cpan/Compress-Raw-Zlib/lib/Compress/Raw/Zlib.pm @@ -10,7 +10,7 @@ use warnings ; use bytes ; our ($VERSION, $XS_VERSION, @ISA, @EXPORT, %EXPORT_TAGS, @EXPORT_OK, $AUTOLOAD, %DEFLATE_CONSTANTS, @DEFLATE_CONSTANTS); -$VERSION = '2.069'; +$VERSION = '2.070'; $XS_VERSION = $VERSION; $VERSION = eval $VERSION; @@ -1568,21 +1568,21 @@ L<Archive::Tar|Archive::Tar>, L<IO::Zlib|IO::Zlib> For RFC 1950, 1951 and 1952 see -F<http://www.faqs.org/rfcs/rfc1950.html>, -F<http://www.faqs.org/rfcs/rfc1951.html> and -F<http://www.faqs.org/rfcs/rfc1952.html> +L<http://www.faqs.org/rfcs/rfc1950.html>, +L<http://www.faqs.org/rfcs/rfc1951.html> and +L<http://www.faqs.org/rfcs/rfc1952.html> The I<zlib> compression library was written by Jean-loup Gailly -F<[email protected]> and Mark Adler F<[email protected]>. +C<[email protected]> and Mark Adler C<[email protected]>. The primary site for the I<zlib> compression library is -F<http://www.zlib.org>. +L<http://www.zlib.org>. -The primary site for gzip is F<http://www.gzip.org>. +The primary site for gzip is L<http://www.gzip.org>. =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 @@ -1590,7 +1590,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-Zlib/zlib-src/inflate.c b/cpan/Compress-Raw-Zlib/zlib-src/inflate.c index c938f49ba7..c8dca0b08f 100644 --- a/cpan/Compress-Raw-Zlib/zlib-src/inflate.c +++ b/cpan/Compress-Raw-Zlib/zlib-src/inflate.c @@ -1490,8 +1490,8 @@ int ZEXPORT inflateUndermine( if (strm == Z_NULL || strm->state == Z_NULL) return Z_STREAM_ERROR; state = (struct inflate_state FAR *)strm->state; -#ifdef INFLATE_ALLOW_INVALID_DISTANCE_TOOFAR_ARRR state->sane = !subvert; +#ifdef INFLATE_ALLOW_INVALID_DISTANCE_TOOFAR_ARRR return Z_OK; #else state->sane = 1; diff --git a/pod/perldelta.pod b/pod/perldelta.pod index 6e33036065..0d8870d0e0 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::Zlib> has been upgraded from version 2.069 to 2.070. + +=item * + L<DB_File> has been upgraded from version 1.838 to 1.840. =item * -- Perl5 Master Repository
