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

Reply via email to