[PATCH] *-Compress-* 2.020

[p5sagit/p5-mst-13.2.git] / ext / IO-Compress / lib / IO / Uncompress / Adapter / Identity.pm

diff --git a/ext/IO-Compress/lib/IO/Uncompress/Adapter/Identity.pm b/ext/IO-Compress/lib/IO/Uncompress/Adapter/Identity.pm
index df71eab..146b4c9 100755 (executable)
--- a/ext/IO-Compress/lib/IO/Uncompress/Adapter/Identity.pm
+++ b/ext/IO-Compress/lib/IO/Uncompress/Adapter/Identity.pm
@@ -4,13 +4,13 @@ use warnings;
 use strict;
 use bytes;
 
-use IO::Compress::Base::Common  2.019 qw(:Status);
+use IO::Compress::Base::Common  2.020 qw(:Status);
 
 our ($VERSION);
 
-$VERSION = '2.019';
+$VERSION = '2.020';
 
-use Compress::Raw::Zlib  2.019 ();
+use Compress::Raw::Zlib  2.020 ();
 
 sub mkUncompObject
 {
@@ -23,6 +23,8 @@ sub mkUncompObject
             'CRC32'      => Compress::Raw::Zlib::crc32(''),
             'wantADLER32'=> $adler32,
             'ADLER32'    => Compress::Raw::Zlib::adler32(''),
+            'ConsumesInput' => 1,
+
           } ;
 }
 
@@ -97,6 +99,7 @@ sub adler32
     return $self->{ADLER32};
 }
 
+
 1;
 
 __END__