use bytes;
-use IO::Compress::Base 2.005 ;
-use IO::Compress::Base::Common 2.005 qw(:Status createSelfTiedObject);
-use IO::Compress::Adapter::Deflate 2.005 ;
+use IO::Compress::Base 2.006 ;
+use IO::Compress::Base::Common 2.006 qw(:Status createSelfTiedObject);
+use IO::Compress::Adapter::Deflate 2.006 ;
require Exporter ;
our ($VERSION, @ISA, @EXPORT_OK, %DEFLATE_CONSTANTS, %EXPORT_TAGS, $RawDeflateError);
-$VERSION = '2.005';
+$VERSION = '2.006';
$RawDeflateError = '';
@ISA = qw(Exporter IO::Compress::Base);
@EXPORT_OK = qw( $RawDeflateError rawdeflate ) ;
-push @{ $EXPORT_TAGS{all} }, @EXPORT_OK ;
%EXPORT_TAGS = ( flush => [qw{
Z_NO_FLUSH
$EXPORT_TAGS{all} = $EXPORT_TAGS{constants} ;
}
+
%DEFLATE_CONSTANTS = %EXPORT_TAGS;
+push @{ $EXPORT_TAGS{all} }, @EXPORT_OK ;
+
Exporter::export_ok_tags('all');
{
my $self = shift ;
- use IO::Compress::Base::Common 2.005 qw(:Parse);
- use Compress::Raw::Zlib 2.005 qw(Z_DEFLATED Z_DEFAULT_COMPRESSION Z_DEFAULT_STRATEGY);
+ use IO::Compress::Base::Common 2.006 qw(:Parse);
+ use Compress::Raw::Zlib 2.006 qw(Z_DEFLATED Z_DEFAULT_COMPRESSION Z_DEFAULT_STRATEGY);
return (