"Fossies" - the Fresh Open Source Software Archive  

Source code changes of the file "lib/IO/Uncompress/Adapter/Bunzip2.pm" between
IO-Compress-2.092.tar.gz and IO-Compress-2.093.tar.gz

About: IO-Compress is a Perl interface to the zlib compression library (contains Compress-Zlib, IO-Compress-Zlib, IO-Compress-Bzip2, IO-Compress-Base).

Bunzip2.pm  (IO-Compress-2.092):Bunzip2.pm  (IO-Compress-2.093)
package IO::Uncompress::Adapter::Bunzip2; package IO::Uncompress::Adapter::Bunzip2;
use strict; use strict;
use warnings; use warnings;
use bytes; use bytes;
use IO::Compress::Base::Common 2.092 qw(:Status); use IO::Compress::Base::Common 2.093 qw(:Status);
use Compress::Raw::Bzip2 2.092 ; use Compress::Raw::Bzip2 2.093 ;
our ($VERSION, @ISA); our ($VERSION, @ISA);
$VERSION = '2.092'; $VERSION = '2.093';
sub mkUncompObject sub mkUncompObject
{ {
my $small = shift || 0; my $small = shift || 0;
my $verbosity = shift || 0; my $verbosity = shift || 0;
my ($inflate, $status) = new Compress::Raw::Bunzip2(1, 1, $small, $verbosity , 1); my ($inflate, $status) = new Compress::Raw::Bunzip2(1, 1, $small, $verbosity , 1);
return (undef, "Could not create Inflation object: $status", $status) return (undef, "Could not create Inflation object: $status", $status)
if $status != BZ_OK ; if $status != BZ_OK ;
 End of changes. 3 change blocks. 
3 lines changed or deleted 3 lines changed or added

Home  |  About  |  Features  |  All  |  Newest  |  Dox  |  Diffs  |  RSS Feeds  |  Screenshots  |  Comments  |  Imprint  |  Privacy  |  HTTP(S)