[PATCH] *-Compress-* 2.020
[p5sagit/p5-mst-13.2.git] / ext / IO-Compress / lib / IO / Uncompress / Adapter / Bunzip2.pm
index 4d5df44..87459a2 100644 (file)
@@ -4,12 +4,12 @@ use strict;
 use warnings;
 use bytes;
 
-use IO::Compress::Base::Common 2.019 qw(:Status);
+use IO::Compress::Base::Common 2.020 qw(:Status);
 
-use Compress::Raw::Bzip2 2.019 ;
+use Compress::Raw::Bzip2 2.020 ;
 
 our ($VERSION, @ISA);
-$VERSION = '2.019';
+$VERSION = '2.020';
 
 sub mkUncompObject
 {
@@ -21,10 +21,11 @@ sub mkUncompObject
     return (undef, "Could not create Inflation object: $status", $status)
         if $status != BZ_OK ;
 
-    return bless {'Inf'        => $inflate,
-                  'CompSize'   => 0,
-                  'UnCompSize' => 0,
-                  'Error'      => '',
+    return bless {'Inf'           => $inflate,
+                  'CompSize'      => 0,
+                  'UnCompSize'    => 0,
+                  'Error'         => '',
+                  'ConsumesInput' => 1,
                  }  ;     
     
 }