This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Update IO-Compress to CPAN version 2.058
authorChris 'BinGOs' Williams <chris@bingosnet.co.uk>
Mon, 12 Nov 2012 23:49:19 +0000 (23:49 +0000)
committerChris 'BinGOs' Williams <chris@bingosnet.co.uk>
Mon, 12 Nov 2012 23:49:19 +0000 (23:49 +0000)
  [DELTA]

  2.058 12 November 2012

      * RT# 81119: Latest IO::Compress 2.057 fails tests on 5.8.x

32 files changed:
Porting/Maintainers.pl
cpan/IO-Compress/Changes
cpan/IO-Compress/Makefile.PL
cpan/IO-Compress/README
cpan/IO-Compress/lib/Compress/Zlib.pm
cpan/IO-Compress/lib/IO/Compress/Adapter/Bzip2.pm
cpan/IO-Compress/lib/IO/Compress/Adapter/Deflate.pm
cpan/IO-Compress/lib/IO/Compress/Adapter/Identity.pm
cpan/IO-Compress/lib/IO/Compress/Base.pm
cpan/IO-Compress/lib/IO/Compress/Base/Common.pm
cpan/IO-Compress/lib/IO/Compress/Bzip2.pm
cpan/IO-Compress/lib/IO/Compress/Deflate.pm
cpan/IO-Compress/lib/IO/Compress/Gzip.pm
cpan/IO-Compress/lib/IO/Compress/Gzip/Constants.pm
cpan/IO-Compress/lib/IO/Compress/RawDeflate.pm
cpan/IO-Compress/lib/IO/Compress/Zip.pm
cpan/IO-Compress/lib/IO/Compress/Zip/Constants.pm
cpan/IO-Compress/lib/IO/Compress/Zlib/Constants.pm
cpan/IO-Compress/lib/IO/Compress/Zlib/Extra.pm
cpan/IO-Compress/lib/IO/Uncompress/Adapter/Bunzip2.pm
cpan/IO-Compress/lib/IO/Uncompress/Adapter/Identity.pm
cpan/IO-Compress/lib/IO/Uncompress/Adapter/Inflate.pm
cpan/IO-Compress/lib/IO/Uncompress/AnyInflate.pm
cpan/IO-Compress/lib/IO/Uncompress/AnyUncompress.pm
cpan/IO-Compress/lib/IO/Uncompress/Base.pm
cpan/IO-Compress/lib/IO/Uncompress/Bunzip2.pm
cpan/IO-Compress/lib/IO/Uncompress/Gunzip.pm
cpan/IO-Compress/lib/IO/Uncompress/Inflate.pm
cpan/IO-Compress/lib/IO/Uncompress/RawInflate.pm
cpan/IO-Compress/lib/IO/Uncompress/Unzip.pm
cpan/IO-Compress/t/000prereq.t
cpan/IO-Compress/t/01misc.t

index 38c4f05..c840d38 100755 (executable)
@@ -1025,7 +1025,7 @@ use File::Glob qw(:case);
 
     'IO-Compress' => {
         'MAINTAINER'   => 'pmqs',
-        'DISTRIBUTION' => 'PMQS/IO-Compress-2.057.tar.gz',
+        'DISTRIBUTION' => 'PMQS/IO-Compress-2.058.tar.gz',
         'FILES'        => q[cpan/IO-Compress],
         'EXCLUDED'     => [qr{t/Test/}],
         'UPSTREAM'     => 'cpan',
index 8ad6fe7..aa79eeb 100644 (file)
@@ -1,6 +1,10 @@
 CHANGES
 -------
 
+  2.058 12 November 2012
+
+      * RT# 81119: Latest IO::Compress 2.057 fails tests on 5.8.x
+
   2.057 10 November 2012
 
       * IO::Compress::Zip
index 9a7e31f..3648efa 100644 (file)
@@ -3,7 +3,7 @@
 use strict ;
 require 5.006 ;
 
-$::VERSION = '2.057' ;
+$::VERSION = '2.058' ;
 
 use private::MakeUtil;
 use ExtUtils::MakeMaker 5.16 ;
index 8973f7c..c92bccd 100644 (file)
@@ -1,9 +1,9 @@
 
                             IO-Compress
 
-                         Version 2.057
+                         Version 2.058
 
-                            10th November 2012
+                            12th November 2012
 
        Copyright (c) 1995-2012 Paul Marquess. All rights reserved.
           This program is free software; you can redistribute it
@@ -89,7 +89,7 @@ To help me help you, I need all of the following information:
         If you haven't installed IO-Compress then search IO::Compress::Gzip.pm
         for a line like this:
 
-          $VERSION = "2.057" ;
+          $VERSION = "2.058" ;
 
  2. If you are having problems building IO-Compress, send me a
     complete log of what happened. Start by unpacking the IO-Compress
index ac43436..56cd13c 100644 (file)
@@ -7,17 +7,17 @@ use Carp ;
 use IO::Handle ;
 use Scalar::Util qw(dualvar);
 
-use IO::Compress::Base::Common 2.057 ;
-use Compress::Raw::Zlib 2.057 ;
-use IO::Compress::Gzip 2.057 ;
-use IO::Uncompress::Gunzip 2.057 ;
+use IO::Compress::Base::Common 2.058 ;
+use Compress::Raw::Zlib 2.058 ;
+use IO::Compress::Gzip 2.058 ;
+use IO::Uncompress::Gunzip 2.058 ;
 
 use strict ;
 use warnings ;
 use bytes ;
 our ($VERSION, $XS_VERSION, @ISA, @EXPORT, @EXPORT_OK, %EXPORT_TAGS);
 
-$VERSION = '2.057';
+$VERSION = '2.058';
 $XS_VERSION = $VERSION; 
 $VERSION = eval $VERSION;
 
@@ -461,7 +461,7 @@ sub inflate
 
 package Compress::Zlib ;
 
-use IO::Compress::Gzip::Constants 2.057 ;
+use IO::Compress::Gzip::Constants 2.058 ;
 
 sub memGzip($)
 {
index 2971e92..4c97f78 100644 (file)
@@ -4,12 +4,12 @@ use strict;
 use warnings;
 use bytes;
 
-use IO::Compress::Base::Common  2.057 qw(:Status);
+use IO::Compress::Base::Common  2.058 qw(:Status);
 
-use Compress::Raw::Bzip2  2.057 ;
+use Compress::Raw::Bzip2  2.058 ;
 
 our ($VERSION);
-$VERSION = '2.057';
+$VERSION = '2.058';
 
 sub mkCompObject
 {
index b3b9f53..b3e0718 100644 (file)
@@ -4,13 +4,13 @@ use strict;
 use warnings;
 use bytes;
 
-use IO::Compress::Base::Common 2.057 qw(:Status);
-use Compress::Raw::Zlib  2.057 qw( !crc32 !adler32 ) ;
+use IO::Compress::Base::Common 2.058 qw(:Status);
+use Compress::Raw::Zlib  2.058 qw( !crc32 !adler32 ) ;
                                   
 require Exporter;                                     
 our ($VERSION, @ISA, @EXPORT_OK, %EXPORT_TAGS, @EXPORT, %DEFLATE_CONSTANTS);
 
-$VERSION = '2.057';
+$VERSION = '2.058';
 @ISA = qw(Exporter);
 @EXPORT_OK = @Compress::Raw::Zlib::DEFLATE_CONSTANTS;
 %EXPORT_TAGS = %Compress::Raw::Zlib::DEFLATE_CONSTANTS;
index 3e8c4c8..f8e2ef8 100644 (file)
@@ -4,10 +4,10 @@ use strict;
 use warnings;
 use bytes;
 
-use IO::Compress::Base::Common  2.057 qw(:Status);
+use IO::Compress::Base::Common  2.058 qw(:Status);
 our ($VERSION);
 
-$VERSION = '2.057';
+$VERSION = '2.058';
 
 sub mkCompObject
 {
index a18793e..7bfbef9 100644 (file)
@@ -6,7 +6,7 @@ require 5.006 ;
 use strict ;
 use warnings;
 
-use IO::Compress::Base::Common 2.057 ;
+use IO::Compress::Base::Common 2.058 ;
 
 use IO::File (); ;
 use Scalar::Util ();
@@ -20,7 +20,7 @@ use bytes;
 our (@ISA, $VERSION);
 @ISA    = qw(Exporter IO::File);
 
-$VERSION = '2.057';
+$VERSION = '2.058';
 
 #Can't locate object method "SWASHNEW" via package "utf8" (perhaps you forgot to load "utf8"?) at .../ext/Compress-Zlib/Gzip/blib/lib/Compress/Zlib/Common.pm line 16.
 
@@ -234,9 +234,7 @@ sub _create
     #if ($outType eq 'filename' && -e $outValue && ! -w _)
     #  { return $obj->saveErrorString(undef, "Output file '$outValue' is not writable" ) }
 
-
-
-    if ($got->parsed('encode')) { 
+    if ($got->getValue('encode')) { 
         my $want_encoding = $got->getValue('encode');
         *$obj->{Encoding} = getEncoding($obj, $class, $want_encoding);
     }
@@ -678,7 +676,7 @@ sub printf
 
 
 sub flush
-{
+{   
     my $self = shift ;
 
     my $outBuffer='';
@@ -793,7 +791,6 @@ sub _writeFinalTrailer
 sub close
 {
     my $self = shift ;
-
     return 1 if *$self->{Closed} || ! *$self->{Compress} ;
     *$self->{Closed} = 1 ;
 
index deb545d..11ca947 100644 (file)
@@ -11,7 +11,7 @@ use File::GlobMapper;
 require Exporter;
 our ($VERSION, @ISA, @EXPORT, %EXPORT_TAGS, $HAS_ENCODE);
 @ISA = qw(Exporter);
-$VERSION = '2.057';
+$VERSION = '2.058';
 
 @EXPORT = qw( isaFilehandle isaFilename isaScalar
               whatIsInput whatIsOutput 
@@ -106,7 +106,7 @@ sub setBinModeOutput($)
 {
     my $handle = shift ;
 
-    binmode $handle 
+    binmode $handle
         if  $needBinmode;
 }
 
index 5500527..45fe83c 100644 (file)
@@ -5,16 +5,16 @@ use warnings;
 use bytes;
 require Exporter ;
 
-use IO::Compress::Base 2.057 ;
+use IO::Compress::Base 2.058 ;
 
-use IO::Compress::Base::Common  2.057 qw();
-use IO::Compress::Adapter::Bzip2 2.057 ;
+use IO::Compress::Base::Common  2.058 qw();
+use IO::Compress::Adapter::Bzip2 2.058 ;
 
 
 
 our ($VERSION, @ISA, @EXPORT_OK, %EXPORT_TAGS, $Bzip2Error);
 
-$VERSION = '2.057';
+$VERSION = '2.058';
 $Bzip2Error = '';
 
 @ISA    = qw(Exporter IO::Compress::Base);
@@ -51,7 +51,7 @@ sub getExtraParams
 {
     my $self = shift ;
 
-    use IO::Compress::Base::Common  2.057 qw(:Parse);
+    use IO::Compress::Base::Common  2.058 qw(:Parse);
     
     return (  
             'blocksize100k' => [IO::Compress::Base::Common::Parse_unsigned,  1],
index e169b19..d6368fa 100644 (file)
@@ -8,16 +8,16 @@ use bytes;
 
 require Exporter ;
 
-use IO::Compress::RawDeflate 2.057 ();
-use IO::Compress::Adapter::Deflate 2.057 ;
+use IO::Compress::RawDeflate 2.058 ();
+use IO::Compress::Adapter::Deflate 2.058 ;
 
-use IO::Compress::Zlib::Constants 2.057 ;
-use IO::Compress::Base::Common  2.057 qw();
+use IO::Compress::Zlib::Constants 2.058 ;
+use IO::Compress::Base::Common  2.058 qw();
 
 
 our ($VERSION, @ISA, @EXPORT_OK, %EXPORT_TAGS, %DEFLATE_CONSTANTS, $DeflateError);
 
-$VERSION = '2.057';
+$VERSION = '2.058';
 $DeflateError = '';
 
 @ISA    = qw(Exporter IO::Compress::RawDeflate);
index 702c6c7..77b66e8 100644 (file)
@@ -8,12 +8,12 @@ use bytes;
 
 require Exporter ;
 
-use IO::Compress::RawDeflate 2.057 () ; 
-use IO::Compress::Adapter::Deflate 2.057 ;
+use IO::Compress::RawDeflate 2.058 () ; 
+use IO::Compress::Adapter::Deflate 2.058 ;
 
-use IO::Compress::Base::Common  2.057 qw(:Status );
-use IO::Compress::Gzip::Constants 2.057 ;
-use IO::Compress::Zlib::Extra 2.057 ;
+use IO::Compress::Base::Common  2.058 qw(:Status );
+use IO::Compress::Gzip::Constants 2.058 ;
+use IO::Compress::Zlib::Extra 2.058 ;
 
 BEGIN
 {
@@ -25,7 +25,7 @@ BEGIN
 
 our ($VERSION, @ISA, @EXPORT_OK, %EXPORT_TAGS, %DEFLATE_CONSTANTS, $GzipError);
 
-$VERSION = '2.057';
+$VERSION = '2.058';
 $GzipError = '' ;
 
 @ISA    = qw(Exporter IO::Compress::RawDeflate);
index d86624b..17940a4 100644 (file)
@@ -9,7 +9,7 @@ require Exporter;
 our ($VERSION, @ISA, @EXPORT, %GZIP_OS_Names);
 our ($GZIP_FNAME_INVALID_CHAR_RE, $GZIP_FCOMMENT_INVALID_CHAR_RE);
 
-$VERSION = '2.057';
+$VERSION = '2.058';
 
 @ISA = qw(Exporter);
 
index d3f432c..8bf3358 100644 (file)
@@ -6,15 +6,15 @@ use strict ;
 use warnings;
 use bytes;
 
-use IO::Compress::Base 2.057 ;
-use IO::Compress::Base::Common  2.057 qw(:Status );
-use IO::Compress::Adapter::Deflate 2.057 ;
+use IO::Compress::Base 2.058 ;
+use IO::Compress::Base::Common  2.058 qw(:Status );
+use IO::Compress::Adapter::Deflate 2.058 ;
 
 require Exporter ;
 
 our ($VERSION, @ISA, @EXPORT_OK, %DEFLATE_CONSTANTS, %EXPORT_TAGS, $RawDeflateError);
 
-$VERSION = '2.057';
+$VERSION = '2.058';
 $RawDeflateError = '';
 
 @ISA = qw(Exporter IO::Compress::Base);
@@ -116,8 +116,8 @@ sub getExtraParams
     return getZlibParams();
 }
 
-use IO::Compress::Base::Common  2.057 qw(:Parse);
-use Compress::Raw::Zlib  2.057 qw(Z_DEFLATED Z_DEFAULT_COMPRESSION Z_DEFAULT_STRATEGY);
+use IO::Compress::Base::Common  2.058 qw(:Parse);
+use Compress::Raw::Zlib  2.058 qw(Z_DEFLATED Z_DEFAULT_COMPRESSION Z_DEFAULT_STRATEGY);
 our %PARAMS = (
             #'method'   => [IO::Compress::Base::Common::Parse_unsigned,  Z_DEFLATED],
             'level'     => [IO::Compress::Base::Common::Parse_signed,    Z_DEFAULT_COMPRESSION],
index 3c66ae7..3a88226 100644 (file)
@@ -4,30 +4,30 @@ use strict ;
 use warnings;
 use bytes;
 
-use IO::Compress::Base::Common  2.057 qw(:Status );
-use IO::Compress::RawDeflate 2.057 ();
-use IO::Compress::Adapter::Deflate 2.057 ;
-use IO::Compress::Adapter::Identity 2.057 ;
-use IO::Compress::Zlib::Extra 2.057 ;
-use IO::Compress::Zip::Constants 2.057 ;
+use IO::Compress::Base::Common  2.058 qw(:Status );
+use IO::Compress::RawDeflate 2.058 ();
+use IO::Compress::Adapter::Deflate 2.058 ;
+use IO::Compress::Adapter::Identity 2.058 ;
+use IO::Compress::Zlib::Extra 2.058 ;
+use IO::Compress::Zip::Constants 2.058 ;
 
 use File::Spec();
 use Config;
 
-use Compress::Raw::Zlib  2.057 (); 
+use Compress::Raw::Zlib  2.058 (); 
 
 BEGIN
 {
     eval { require IO::Compress::Adapter::Bzip2 ; 
-           import  IO::Compress::Adapter::Bzip2 2.057 ; 
+           import  IO::Compress::Adapter::Bzip2 2.058 ; 
            require IO::Compress::Bzip2 ; 
-           import  IO::Compress::Bzip2 2.057 ; 
+           import  IO::Compress::Bzip2 2.058 ; 
          } ;
          
     eval { require IO::Compress::Adapter::Lzma ; 
-           import  IO::Compress::Adapter::Lzma 2.057 ; 
+           import  IO::Compress::Adapter::Lzma 2.058 ; 
            require IO::Compress::Lzma ; 
-           import  IO::Compress::Lzma 2.057 ; 
+           import  IO::Compress::Lzma 2.058 ; 
          } ;
 }
 
@@ -36,7 +36,7 @@ require Exporter ;
 
 our ($VERSION, @ISA, @EXPORT_OK, %EXPORT_TAGS, %DEFLATE_CONSTANTS, $ZipError);
 
-$VERSION = '2.057';
+$VERSION = '2.058';
 $ZipError = '';
 
 @ISA = qw(Exporter IO::Compress::RawDeflate);
index 3e1a0a0..92f172e 100644 (file)
@@ -7,7 +7,7 @@ require Exporter;
 
 our ($VERSION, @ISA, @EXPORT, %ZIP_CM_MIN_VERSIONS);
 
-$VERSION = '2.057';
+$VERSION = '2.058';
 
 @ISA = qw(Exporter);
 
index a1b22d3..f671c19 100644 (file)
@@ -9,7 +9,7 @@ require Exporter;
 
 our ($VERSION, @ISA, @EXPORT);
 
-$VERSION = '2.057';
+$VERSION = '2.058';
 
 @ISA = qw(Exporter);
 
index 8b840ff..61f1e67 100644 (file)
@@ -8,9 +8,9 @@ use bytes;
 
 our ($VERSION, @ISA, @EXPORT_OK, %EXPORT_TAGS);
 
-$VERSION = '2.057';
+$VERSION = '2.058';
 
-use IO::Compress::Gzip::Constants 2.057 ;
+use IO::Compress::Gzip::Constants 2.058 ;
 
 sub ExtraFieldError
 {
index c4c5e5c..0acbe4d 100644 (file)
@@ -4,12 +4,12 @@ use strict;
 use warnings;
 use bytes;
 
-use IO::Compress::Base::Common 2.057 qw(:Status);
+use IO::Compress::Base::Common 2.058 qw(:Status);
 
-use Compress::Raw::Bzip2 2.057 ;
+use Compress::Raw::Bzip2 2.058 ;
 
 our ($VERSION, @ISA);
-$VERSION = '2.057';
+$VERSION = '2.058';
 
 sub mkUncompObject
 {
index c4345bb..c2fba6f 100644 (file)
@@ -4,14 +4,14 @@ use warnings;
 use strict;
 use bytes;
 
-use IO::Compress::Base::Common  2.057 qw(:Status);
+use IO::Compress::Base::Common  2.058 qw(:Status);
 use IO::Compress::Zip::Constants ;
 
 our ($VERSION);
 
-$VERSION = '2.057';
+$VERSION = '2.058';
 
-use Compress::Raw::Zlib  2.057 ();
+use Compress::Raw::Zlib  2.058 ();
 
 sub mkUncompObject
 {
index f65ed67..6dd499d 100644 (file)
@@ -4,11 +4,11 @@ use strict;
 use warnings;
 use bytes;
 
-use IO::Compress::Base::Common  2.057 qw(:Status);
-use Compress::Raw::Zlib  2.057 qw(Z_OK Z_BUF_ERROR Z_STREAM_END Z_FINISH MAX_WBITS);
+use IO::Compress::Base::Common  2.058 qw(:Status);
+use Compress::Raw::Zlib  2.058 qw(Z_OK Z_BUF_ERROR Z_STREAM_END Z_FINISH MAX_WBITS);
 
 our ($VERSION);
-$VERSION = '2.057';
+$VERSION = '2.058';
 
 
 
index d6602f0..a51141d 100644 (file)
@@ -6,22 +6,22 @@ use strict;
 use warnings;
 use bytes;
 
-use IO::Compress::Base::Common  2.057 ();
+use IO::Compress::Base::Common  2.058 ();
 
-use IO::Uncompress::Adapter::Inflate  2.057 ();
+use IO::Uncompress::Adapter::Inflate  2.058 ();
 
 
-use IO::Uncompress::Base  2.057 ;
-use IO::Uncompress::Gunzip  2.057 ;
-use IO::Uncompress::Inflate  2.057 ;
-use IO::Uncompress::RawInflate  2.057 ;
-use IO::Uncompress::Unzip  2.057 ;
+use IO::Uncompress::Base  2.058 ;
+use IO::Uncompress::Gunzip  2.058 ;
+use IO::Uncompress::Inflate  2.058 ;
+use IO::Uncompress::RawInflate  2.058 ;
+use IO::Uncompress::Unzip  2.058 ;
 
 require Exporter ;
 
 our ($VERSION, @ISA, @EXPORT_OK, %EXPORT_TAGS, $AnyInflateError);
 
-$VERSION = '2.057';
+$VERSION = '2.058';
 $AnyInflateError = '';
 
 @ISA = qw( Exporter IO::Uncompress::Base );
@@ -48,7 +48,7 @@ sub anyinflate
 
 sub getExtraParams
 {
-    use IO::Compress::Base::Common  2.057 qw(:Parse);
+    use IO::Compress::Base::Common  2.058 qw(:Parse);
     return ( 'rawinflate' => [Parse_boolean,  0] ) ;
 }
 
index 53c9091..7592dd6 100644 (file)
@@ -4,16 +4,16 @@ use strict;
 use warnings;
 use bytes;
 
-use IO::Compress::Base::Common 2.057 ();
+use IO::Compress::Base::Common 2.058 ();
 
-use IO::Uncompress::Base 2.057 ;
+use IO::Uncompress::Base 2.058 ;
 
 
 require Exporter ;
 
 our ($VERSION, @ISA, @EXPORT_OK, %EXPORT_TAGS, $AnyUncompressError);
 
-$VERSION = '2.057';
+$VERSION = '2.058';
 $AnyUncompressError = '';
 
 @ISA = qw( Exporter IO::Uncompress::Base );
@@ -27,22 +27,22 @@ Exporter::export_ok_tags('all');
 
 BEGIN
 {
-   eval ' use IO::Uncompress::Adapter::Inflate 2.057 ;';
-   eval ' use IO::Uncompress::Adapter::Bunzip2 2.057 ;';
-   eval ' use IO::Uncompress::Adapter::LZO 2.057 ;';
-   eval ' use IO::Uncompress::Adapter::Lzf 2.057 ;';
-   eval ' use IO::Uncompress::Adapter::UnLzma 2.057 ;';
-   eval ' use IO::Uncompress::Adapter::UnXz 2.057 ;';
-
-   eval ' use IO::Uncompress::Bunzip2 2.057 ;';
-   eval ' use IO::Uncompress::UnLzop 2.057 ;';
-   eval ' use IO::Uncompress::Gunzip 2.057 ;';
-   eval ' use IO::Uncompress::Inflate 2.057 ;';
-   eval ' use IO::Uncompress::RawInflate 2.057 ;';
-   eval ' use IO::Uncompress::Unzip 2.057 ;';
-   eval ' use IO::Uncompress::UnLzf 2.057 ;';
-   eval ' use IO::Uncompress::UnLzma 2.057 ;';
-   eval ' use IO::Uncompress::UnXz 2.057 ;';
+   eval ' use IO::Uncompress::Adapter::Inflate 2.058 ;';
+   eval ' use IO::Uncompress::Adapter::Bunzip2 2.058 ;';
+   eval ' use IO::Uncompress::Adapter::LZO 2.058 ;';
+   eval ' use IO::Uncompress::Adapter::Lzf 2.058 ;';
+   eval ' use IO::Uncompress::Adapter::UnLzma 2.058 ;';
+   eval ' use IO::Uncompress::Adapter::UnXz 2.058 ;';
+
+   eval ' use IO::Uncompress::Bunzip2 2.058 ;';
+   eval ' use IO::Uncompress::UnLzop 2.058 ;';
+   eval ' use IO::Uncompress::Gunzip 2.058 ;';
+   eval ' use IO::Uncompress::Inflate 2.058 ;';
+   eval ' use IO::Uncompress::RawInflate 2.058 ;';
+   eval ' use IO::Uncompress::Unzip 2.058 ;';
+   eval ' use IO::Uncompress::UnLzf 2.058 ;';
+   eval ' use IO::Uncompress::UnLzma 2.058 ;';
+   eval ' use IO::Uncompress::UnXz 2.058 ;';
 }
 
 sub new
index 5c34b81..68d530e 100644 (file)
@@ -9,12 +9,12 @@ our (@ISA, $VERSION, @EXPORT_OK, %EXPORT_TAGS);
 @ISA    = qw(Exporter IO::File);
 
 
-$VERSION = '2.057';
+$VERSION = '2.058';
 
 use constant G_EOF => 0 ;
 use constant G_ERR => -1 ;
 
-use IO::Compress::Base::Common 2.057 ;
+use IO::Compress::Base::Common 2.058 ;
 
 use IO::File ;
 use Symbol;
index 199d0ee..edba4f4 100644 (file)
@@ -4,15 +4,15 @@ use strict ;
 use warnings;
 use bytes;
 
-use IO::Compress::Base::Common 2.057 qw(:Status );
+use IO::Compress::Base::Common 2.058 qw(:Status );
 
-use IO::Uncompress::Base 2.057 ;
-use IO::Uncompress::Adapter::Bunzip2 2.057 ;
+use IO::Uncompress::Base 2.058 ;
+use IO::Uncompress::Adapter::Bunzip2 2.058 ;
 
 require Exporter ;
 our ($VERSION, @ISA, @EXPORT_OK, %EXPORT_TAGS, $Bunzip2Error);
 
-$VERSION = '2.057';
+$VERSION = '2.058';
 $Bunzip2Error = '';
 
 @ISA    = qw( Exporter IO::Uncompress::Base );
index b57b96f..5475c61 100644 (file)
@@ -9,12 +9,12 @@ use strict ;
 use warnings;
 use bytes;
 
-use IO::Uncompress::RawInflate 2.057 ;
+use IO::Uncompress::RawInflate 2.058 ;
 
-use Compress::Raw::Zlib 2.057 () ;
-use IO::Compress::Base::Common 2.057 qw(:Status );
-use IO::Compress::Gzip::Constants 2.057 ;
-use IO::Compress::Zlib::Extra 2.057 ;
+use Compress::Raw::Zlib 2.058 () ;
+use IO::Compress::Base::Common 2.058 qw(:Status );
+use IO::Compress::Gzip::Constants 2.058 ;
+use IO::Compress::Zlib::Extra 2.058 ;
 
 require Exporter ;
 
@@ -28,7 +28,7 @@ Exporter::export_ok_tags('all');
 
 $GunzipError = '';
 
-$VERSION = '2.057';
+$VERSION = '2.058';
 
 sub new
 {
index 621049d..45f1336 100644 (file)
@@ -5,15 +5,15 @@ use strict ;
 use warnings;
 use bytes;
 
-use IO::Compress::Base::Common  2.057 qw(:Status );
-use IO::Compress::Zlib::Constants 2.057 ;
+use IO::Compress::Base::Common  2.058 qw(:Status );
+use IO::Compress::Zlib::Constants 2.058 ;
 
-use IO::Uncompress::RawInflate  2.057 ;
+use IO::Uncompress::RawInflate  2.058 ;
 
 require Exporter ;
 our ($VERSION, @ISA, @EXPORT_OK, %EXPORT_TAGS, $InflateError);
 
-$VERSION = '2.057';
+$VERSION = '2.058';
 $InflateError = '';
 
 @ISA    = qw( Exporter IO::Uncompress::RawInflate );
index 9dae685..88bb9f7 100644 (file)
@@ -5,16 +5,16 @@ use strict ;
 use warnings;
 use bytes;
 
-use Compress::Raw::Zlib  2.057 ;
-use IO::Compress::Base::Common  2.057 qw(:Status );
+use Compress::Raw::Zlib  2.058 ;
+use IO::Compress::Base::Common  2.058 qw(:Status );
 
-use IO::Uncompress::Base  2.057 ;
-use IO::Uncompress::Adapter::Inflate  2.057 ;
+use IO::Uncompress::Base  2.058 ;
+use IO::Uncompress::Adapter::Inflate  2.058 ;
 
 require Exporter ;
 our ($VERSION, @ISA, @EXPORT_OK, %EXPORT_TAGS, %DEFLATE_CONSTANTS, $RawInflateError);
 
-$VERSION = '2.057';
+$VERSION = '2.058';
 $RawInflateError = '';
 
 @ISA    = qw( Exporter IO::Uncompress::Base );
index 84375f2..c1bac41 100644 (file)
@@ -9,14 +9,14 @@ use warnings;
 use bytes;
 
 use IO::File;
-use IO::Uncompress::RawInflate  2.057 ;
-use IO::Compress::Base::Common  2.057 qw(:Status );
-use IO::Uncompress::Adapter::Inflate  2.057 ;
-use IO::Uncompress::Adapter::Identity 2.057 ;
-use IO::Compress::Zlib::Extra 2.057 ;
-use IO::Compress::Zip::Constants 2.057 ;
+use IO::Uncompress::RawInflate  2.058 ;
+use IO::Compress::Base::Common  2.058 qw(:Status );
+use IO::Uncompress::Adapter::Inflate  2.058 ;
+use IO::Uncompress::Adapter::Identity 2.058 ;
+use IO::Compress::Zlib::Extra 2.058 ;
+use IO::Compress::Zip::Constants 2.058 ;
 
-use Compress::Raw::Zlib  2.057 () ;
+use Compress::Raw::Zlib  2.058 () ;
 
 BEGIN
 {
@@ -31,7 +31,7 @@ require Exporter ;
 
 our ($VERSION, @ISA, @EXPORT_OK, %EXPORT_TAGS, $UnzipError, %headerLookup);
 
-$VERSION = '2.057';
+$VERSION = '2.058';
 $UnzipError = '';
 
 @ISA    = qw(Exporter IO::Uncompress::RawInflate);
index 0751b1b..3903e37 100644 (file)
@@ -25,7 +25,7 @@ BEGIN
         if eval { require Test::NoWarnings ;  import Test::NoWarnings; 1 };
 
 
-    my $VERSION = '2.057';
+    my $VERSION = '2.058';
     my @NAMES = qw(
                        Compress::Raw::Bzip2
                        Compress::Raw::Zlib
index 987e067..352fbcd 100644 (file)
@@ -72,18 +72,18 @@ sub My::testParseParameters()
     {
         use Config;
 
-        skip 'readonly + threads', 1
+        skip 'readonly + threads', 2
             if $Config{useithreads};
 
         eval { ParseParameters(1, {'fred' => [Parse_writable_scalar, 0]}, fred => 'abc') ; };
         like $@, mkErr("Parameter 'fred' not writable"), 
                 "wanted writable, got readonly";
+
+        eval { ParseParameters(1, {'fred' => [Parse_writable_scalar, 0]}, fred => \'abc') ; };
+        like $@, mkErr("Parameter 'fred' not writable"), 
+                "wanted writable, got readonly";
     }
 
-    eval { ParseParameters(1, {'fred' => [Parse_writable_scalar, 0]}, fred => \'abc') ; };
-    like $@, mkErr("Parameter 'fred' not writable"), 
-            "wanted writable, got readonly";
-            
     my @xx;
     eval { ParseParameters(1, {'fred' => [Parse_writable_scalar, 0]}, fred => \@xx) ; };
     like $@, mkErr("Parameter 'fred' not a scalar reference"),