Removed the unused Append => 0 parameter when creating compression I/O.

This commit is contained in:
依瑪貓 2022-03-19 09:58:48 +08:00
parent ac69039180
commit 0a4ee2d130

4
arclog
View File

@ -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 $_;