From 0a4ee2d13089cb80717f9929d290fb12d3fea260 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?=E4=BE=9D=E7=91=AA=E8=B2=93?= Date: Sat, 19 Mar 2022 09:58:48 +0800 Subject: [PATCH] Removed the unused Append => 0 parameter when creating compression I/O. --- arclog | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/arclog b/arclog index fe4cf1e..0965d86 100755 --- a/arclog +++ b/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 $_;