eleksir/slackmetarep
0
Fork 0
Code Activity

Fix truncated gzip metadata on slackware-15.0

Browse Source
This commit is contained in:
eleksir
2022-07-10 01:30:50 +03:00
parent c4cfc8b20d
commit 7576bcf989
1 changed files with 6 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
Slackmetarep/Metagen.pm
View File

@@ -477,15 +477,15 @@ sub __gzipData ($) {
my $databufref = shift;
my $ret;
my $gz = Compress::Raw::Zlib::Deflate->new (
my ($gz, $status) = Compress::Raw::Zlib::Deflate->new (
-Level => Z_BEST_COMPRESSION,
-CRC32 => 1,
-ADLER32=> 1,
-WindowBits => WANT_GZIP
-WindowBits => WANT_GZIP,
-AppendOutput => 1,
);
unless (defined $gz) {
my $msg = 'Unable to create gz object';
if ($status != Z_OK) {
my $msg = "Unable to create gz object: $status";
carp "[FATA] $msg";
$ret->{error} = $msg;
return $ret;