The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
Changes 04
META.json 44
META.yml 44
Makefile.PL 11
README 33
lib/IO/Compress/Adapter/Lzma.pm 33
lib/IO/Compress/Adapter/Xz.pm 33
lib/IO/Compress/Lzma.pm 44
lib/IO/Compress/Xz.pm 55
lib/IO/Uncompress/Adapter/UnLzma.pm 33
lib/IO/Uncompress/Adapter/UnXz.pm 33
lib/IO/Uncompress/UnLzma.pm 44
lib/IO/Uncompress/UnXz.pm 44
t/000prereq.t 11
t/compress/oneshot.pl 225
15 files changed (This is a version diff) 4471
@@ -1,6 +1,10 @@
 CHANGES
 -------
 
+  2.066 21 Sept 2014
+
+      * No Changes
+
   2.064 1 February 2014
 
       * No Changes
@@ -34,12 +34,12 @@
       },
       "runtime" : {
          "requires" : {
-            "Compress::Raw::Lzma" : "2.064",
-            "IO::Compress::Base" : "2.064",
-            "IO::Uncompress::Base" : "2.064"
+            "Compress::Raw::Lzma" : "2.066",
+            "IO::Compress::Base" : "2.066",
+            "IO::Uncompress::Base" : "2.066"
          }
       }
    },
    "release_status" : "stable",
-   "version" : "2.064"
+   "version" : "2.066"
 }
@@ -20,7 +20,7 @@ no_index:
     - t
     - private
 requires:
-  Compress::Raw::Lzma: 2.064
-  IO::Compress::Base: 2.064
-  IO::Uncompress::Base: 2.064
-version: 2.064
+  Compress::Raw::Lzma: 2.066
+  IO::Compress::Base: 2.066
+  IO::Uncompress::Base: 2.066
+version: 2.066
@@ -3,7 +3,7 @@
 use strict ;
 require 5.006 ;
 
-$::VERSION = '2.064' ;
+$::VERSION = '2.066' ;
 
 use private::MakeUtil;
 use ExtUtils::MakeMaker 5.16 ;
@@ -1,9 +1,9 @@
 
                             IO-Compress-Lzma
 
-                         Version 2.064
+                         Version 2.066
 
-                             1st February 2013
+                            21st September 2014
 
        Copyright (c) 2009-2014 Paul Marquess. All rights reserved.
           This program is free software; you can redistribute it
@@ -78,7 +78,7 @@ To help me help you, I need all of the following information:
         If you haven't installed IO-Compress-Lzma then search IO::Compress::Lzma.pm
         for a line like this:
 
-          $VERSION = "2.064" ;
+          $VERSION = "2.066" ;
 
  2. If you are having problems building IO-Compress-Lzma, send me a
     complete log of what happened. Start by unpacking the IO-Compress-Lzma
@@ -4,12 +4,12 @@ use strict;
 use warnings;
 # use bytes;
 
-use IO::Compress::Base::Common  2.064 qw(:Status);
+use IO::Compress::Base::Common  2.066 qw(:Status);
 
-use Compress::Raw::Lzma  2.064 qw(LZMA_OK LZMA_STREAM_END) ;
+use Compress::Raw::Lzma  2.066 qw(LZMA_OK LZMA_STREAM_END) ;
 
 use vars qw($VERSION);
-$VERSION = '2.064';
+$VERSION = '2.066';
 
 sub mkCompObject
 {
@@ -4,12 +4,12 @@ use strict;
 use warnings;
 # use bytes;
 
-use IO::Compress::Base::Common  2.064 qw(:Status);
+use IO::Compress::Base::Common  2.066 qw(:Status);
 
-use Compress::Raw::Lzma  2.064 qw(LZMA_OK LZMA_STREAM_END LZMA_PRESET_DEFAULT LZMA_CHECK_CRC32) ;
+use Compress::Raw::Lzma  2.066 qw(LZMA_OK LZMA_STREAM_END LZMA_PRESET_DEFAULT LZMA_CHECK_CRC32) ;
 
 use vars qw($VERSION);
-$VERSION = '2.064';
+$VERSION = '2.066';
 
 sub mkCompObject
 {
@@ -5,16 +5,16 @@ use warnings;
 # use bytes;
 require Exporter ;
 
-use IO::Compress::Base 2.064 ;
+use IO::Compress::Base 2.066 ;
 
-use IO::Compress::Base::Common  2.064 qw(createSelfTiedObject);
-use IO::Compress::Adapter::Lzma 2.064 ;
+use IO::Compress::Base::Common  2.066 qw(createSelfTiedObject);
+use IO::Compress::Adapter::Lzma 2.066 ;
 
 
 
 use vars qw($VERSION @ISA @EXPORT_OK %EXPORT_TAGS $LzmaError);
 
-$VERSION = '2.064';
+$VERSION = '2.066';
 $LzmaError = '';
 
 @ISA    = qw(Exporter IO::Compress::Base);
@@ -5,15 +5,15 @@ use warnings;
 # use bytes;
 require Exporter ;
 
-use IO::Compress::Base 2.064 ;
-use IO::Compress::Base::Common  2.064 qw(createSelfTiedObject);
-use IO::Compress::Adapter::Xz 2.064 ;
-use Compress::Raw::Lzma  2.064 ;
+use IO::Compress::Base 2.066 ;
+use IO::Compress::Base::Common  2.066 qw(createSelfTiedObject);
+use IO::Compress::Adapter::Xz 2.066 ;
+use Compress::Raw::Lzma  2.066 ;
 
 
 use vars qw($VERSION @ISA @EXPORT_OK %EXPORT_TAGS $XzError);
 
-$VERSION = '2.064';
+$VERSION = '2.066';
 $XzError = '';
 
 @ISA    = qw(Exporter IO::Compress::Base);
@@ -4,12 +4,12 @@ use strict;
 use warnings;
 # use bytes;
 
-use IO::Compress::Base::Common 2.064 qw(:Status);
+use IO::Compress::Base::Common 2.066 qw(:Status);
 
-use Compress::Raw::Lzma 2.064 ;
+use Compress::Raw::Lzma 2.066 ;
 
 use vars qw($VERSION @ISA);
-$VERSION = '2.064';
+$VERSION = '2.066';
 
 #@ISA = qw( Compress::Raw::UnLzma );
 
@@ -4,12 +4,12 @@ use strict;
 use warnings;
 # use bytes;
 
-use IO::Compress::Base::Common 2.064 qw(:Status);
+use IO::Compress::Base::Common 2.066 qw(:Status);
 
-use Compress::Raw::Lzma 2.064 ;
+use Compress::Raw::Lzma 2.066 ;
 
 use vars qw($VERSION @ISA);
-$VERSION = '2.064';
+$VERSION = '2.066';
 
 #@ISA = qw( Compress::Raw::UnLzma );
 
@@ -4,15 +4,15 @@ use strict ;
 use warnings;
 # use bytes;
 
-use IO::Compress::Base::Common 2.064 qw(:Status createSelfTiedObject);
+use IO::Compress::Base::Common 2.066 qw(:Status createSelfTiedObject);
 
-use IO::Uncompress::Base 2.064 ;
-use IO::Uncompress::Adapter::UnLzma 2.064 ;
+use IO::Uncompress::Base 2.066 ;
+use IO::Uncompress::Adapter::UnLzma 2.066 ;
 
 require Exporter ;
 use vars qw($VERSION @ISA @EXPORT_OK %EXPORT_TAGS $UnLzmaError);
 
-$VERSION = '2.064';
+$VERSION = '2.066';
 $UnLzmaError = '';
 
 @ISA    = qw( Exporter IO::Uncompress::Base );
@@ -4,15 +4,15 @@ use strict ;
 use warnings;
 # use bytes;
 
-use IO::Compress::Base::Common 2.064 qw(:Status createSelfTiedObject);
+use IO::Compress::Base::Common 2.066 qw(:Status createSelfTiedObject);
 
-use IO::Uncompress::Base 2.064 ;
-use IO::Uncompress::Adapter::UnXz 2.064 ;
+use IO::Uncompress::Base 2.066 ;
+use IO::Uncompress::Adapter::UnXz 2.066 ;
 
 require Exporter ;
 use vars qw($VERSION @ISA @EXPORT_OK %EXPORT_TAGS $UnXzError);
 
-$VERSION = '2.064';
+$VERSION = '2.066';
 $UnXzError = '';
 
 @ISA    = qw( Exporter IO::Uncompress::Base );
@@ -19,7 +19,7 @@ BEGIN
         if eval { require Test::NoWarnings ;  import Test::NoWarnings; 1 };
 
 
-    my $VERSION = '2.064';
+    my $VERSION = '2.066';
     my @NAMES = qw(
 			Compress::Raw::Lzma
 			IO::Compress::Base
@@ -16,7 +16,7 @@ BEGIN {
     $extra = 1
         if eval { require Test::NoWarnings ;  import Test::NoWarnings; 1 };
 
-    plan tests => 995 + $extra ;
+    plan tests => 1002 + $extra ;
 
     use_ok('IO::Uncompress::AnyUncompress', qw(anyuncompress $AnyUncompressError)) ;
 
@@ -1583,7 +1583,7 @@ sub run
 
 
     {
-        # check setting $/ 
+        # check setting $\ 
 
         my $CompFunc = getTopFuncRef($CompressClass);
         my $UncompFunc = getTopFuncRef($UncompressClass);
@@ -1600,7 +1600,30 @@ sub run
 
     }
 
+    SKIP:
+    {
+        #95494: IO::Uncompress::Gunzip: Can no longer gunzip to in-memory file handle
+
+        skip "open filehandle to buffer not supported in Perl $]", 7
+            if $] < 5.008 ;
+        my $CompFunc = getTopFuncRef($CompressClass);
+        my $UncompFunc = getTopFuncRef($UncompressClass);
+
+        my $input = "hello world";
+        my $compressed ;
+        ok open my $fh_in1, '<', \$input ;
+        ok open my $fh_out1, '>', \$compressed ;
+        ok &$CompFunc($fh_in1 => $fh_out1), '  Compressed ok' ;
+
+        my $output;
+        ok open my $fh_in2, '<', \$compressed ;
+        ok open my $fh_out2, '>', \$output ;
+
+        ok &$UncompFunc($fh_in2 => $fh_out2), '  UnCompressed ok' ;
+        is $output, $input, "round trip ok" ;
+    }
 }
+
 # TODO add more error cases
 
 1;