Removed the unused Append => 0 parameter when creating compression I/O.
This commit is contained in:
parent
ac69039180
commit
0a4ee2d130
4
arclog
4
arclog
@ -1724,7 +1724,7 @@ sub close : method {
|
||||
|
||||
# Create empty compressed content
|
||||
print STDERR " Applying empty compressed content ... " if $VERBOSE > 2;
|
||||
$_ = IO::Compress::Gzip->new($FH, Append => 0)
|
||||
$_ = IO::Compress::Gzip->new($FH)
|
||||
or die "$THIS_FILE: $file: $IO::Compress::Gzip::GzipError";
|
||||
$_->close or die "$THIS_FILE: $file: $IO::Compress::Gzip::GzipError";
|
||||
undef $_;
|
||||
@ -2639,7 +2639,7 @@ sub close : method {
|
||||
|
||||
# Create empty compressed content
|
||||
print STDERR " Applying empty compressed content ... " if $VERBOSE > 2;
|
||||
$_ = IO::Compress::Xz->new($FH, Append => 0)
|
||||
$_ = IO::Compress::Xz->new($FH)
|
||||
or die "$THIS_FILE: $file: $IO::Compress::Xz::XzError";
|
||||
$_->close or die "$THIS_FILE: $file: $IO::Compress::Xz::XzError";
|
||||
undef $_;
|
||||
|
Loading…
Reference in New Issue
Block a user