Update of /cvsroot/fink/dists/10.7/stable/main/finkinfo/libs/perlmods In directory sfp-cvs-1.v30.ch3.sourceforge.com:/tmp/cvs-serv28262
Modified Files: io-compress-pm.info Added Files: io-compress-pm.patch Log Message: fix (thanks for dealing with upstream Snaggle!) Index: io-compress-pm.info =================================================================== RCS file: /cvsroot/fink/dists/10.7/stable/main/finkinfo/libs/perlmods/io-compress-pm.info,v retrieving revision 1.8 retrieving revision 1.9 diff -u -d -r1.8 -r1.9 --- io-compress-pm.info 30 May 2013 01:28:12 -0000 1.8 +++ io-compress-pm.info 19 Jun 2013 01:01:25 -0000 1.9 @@ -1,7 +1,7 @@ Info2: << Package: io-compress-pm%type_pkg[perl] Version: 2.061 -Revision: 1 +Revision: 2 Source: mirror:cpan:modules/by-module/IO/IO-Compress-%v.tar.gz Source-MD5: 0dba831e748f03e549eaf288026ef099 Type: perl (5.12.3 5.12.4) @@ -21,6 +21,8 @@ Conflicts: << compress-zlib-pm%type_pkg[perl]-man << +PatchFile: %{ni}.patch +PatchFile-MD5: 95f604c5602f24ec2f1a6bfc8dcf300f InfoTest: << TestDepends: test-harness-pm%type_pkg[perl] (>= 3.23-1) TestScript: << @@ -42,6 +44,10 @@ PreRmScript: update-alternatives --remove zipdetails %p/bin/zipdetails-pm%type_pkg[perl] +DescPort: << + fix for bzip2 per: + https://rt.cpan.org/Public/Bug/Display.html?id=86234 +<< Description: Reading and writing of compressed data DescDetail: << IO-Compress supports reading and writing of bzip2, RFC 1950, RFC --- NEW FILE: io-compress-pm.patch --- diff -Nurd -x'*~' IO-Compress-2.061.orig/lib/IO/Uncompress/AnyUncompress.pm IO-Compress-2.061/lib/IO/Uncompress/AnyUncompress.pm --- IO-Compress-2.061.orig/lib/IO/Uncompress/AnyUncompress.pm 2013-05-19 07:45:24.000000000 -0400 +++ IO-Compress-2.061/lib/IO/Uncompress/AnyUncompress.pm 2013-06-18 20:57:03.000000000 -0400 @@ -83,6 +83,21 @@ my $magic ; + if (defined $IO::Uncompress::Bunzip2::VERSION and + $magic = $self->ckMagic('Bunzip2')) { + *$self->{Info} = $self->readHeader($magic) + or return undef ; + + my ($obj, $errstr, $errno) = IO::Uncompress::Adapter::Bunzip2::mkUncompObject(); + + return $self->saveErrorString(undef, $errstr, $errno) + if ! defined $obj; + + *$self->{Uncomp} = $obj; + + return 1; + } + # try zlib first if (defined $IO::Uncompress::RawInflate::VERSION ) { @@ -142,21 +157,6 @@ return 1; } - if (defined $IO::Uncompress::Bunzip2::VERSION and - $magic = $self->ckMagic('Bunzip2')) { - *$self->{Info} = $self->readHeader($magic) - or return undef ; - - my ($obj, $errstr, $errno) = IO::Uncompress::Adapter::Bunzip2::mkUncompObject(); - - return $self->saveErrorString(undef, $errstr, $errno) - if ! defined $obj; - - *$self->{Uncomp} = $obj; - - return 1; - } - if (defined $IO::Uncompress::UnLzop::VERSION and $magic = $self->ckMagic('UnLzop')) { ------------------------------------------------------------------------------ This SF.net email is sponsored by Windows: Build for Windows Store. http://p.sf.net/sfu/windows-dev2dev _______________________________________________ Fink-commits mailing list Fink-commits@lists.sourceforge.net http://news.gmane.org/gmane.os.apple.fink.cvs