X-Git-Url: https://perl5.git.perl.org/perl5.git/blobdiff_plain/149b366429edcb44f6e320398df710a398fe18c0..4737eb086461114557478cd96ef0b839db56baf0:/cpan/IO-Compress/lib/IO/Uncompress/Adapter/Identity.pm diff --git a/cpan/IO-Compress/lib/IO/Uncompress/Adapter/Identity.pm b/cpan/IO-Compress/lib/IO/Uncompress/Adapter/Identity.pm index 812f3f8..84d74c9 100644 --- a/cpan/IO-Compress/lib/IO/Uncompress/Adapter/Identity.pm +++ b/cpan/IO-Compress/lib/IO/Uncompress/Adapter/Identity.pm @@ -4,14 +4,14 @@ use warnings; use strict; use bytes; -use IO::Compress::Base::Common 2.064 qw(:Status); +use IO::Compress::Base::Common 2.096 qw(:Status); use IO::Compress::Zip::Constants ; our ($VERSION); -$VERSION = '2.064'; +$VERSION = '2.096'; -use Compress::Raw::Zlib 2.064 (); +use Compress::Raw::Zlib 2.096 (); sub mkUncompObject { @@ -139,7 +139,7 @@ sub reset { my $self = shift; - $self->{CompSize} = 0; + $self->{CompSize}->reset(); $self->{UnCompSize} = 0; $self->{CRC32} = Compress::Raw::Zlib::crc32(''); $self->{ADLER32} = Compress::Raw::Zlib::adler32('');