compression modules update to version 2.005
[p5sagit/p5-mst-13.2.git] / ext / IO_Compress_Zlib / t / 005defhdr.t
index 6cdc175..990b79b 100644 (file)
@@ -42,7 +42,7 @@ sub ReadHeaderInfo
     ok $def->close ;
     #print "ReadHeaderInfo\n"; hexDump(\$buffer);
 
-    ok my $inf = new IO::Uncompress::Inflate \$buffer  ;
+    ok my $inf = new IO::Uncompress::Inflate \$buffer, Append => 1  ;
     my $uncomp ;
     #ok $inf->read($uncomp) ;
     my $actual = 0 ;
@@ -72,7 +72,7 @@ sub ReadHeaderInfoZlib
     cmp_ok $def->flush($buffer), '==', Z_OK;
     #print "ReadHeaderInfoZlib\n"; hexDump(\$buffer);
     
-    ok my $inf = new IO::Uncompress::Inflate \$buffer  ;
+    ok my $inf = new IO::Uncompress::Inflate \$buffer, Append => 1  ;
     my $uncomp ;
     #ok $inf->read($uncomp) ;
     my $actual = 0 ;