@@ -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;