Hi Randy,
To get deflated content to work need to set WindowBits. to -MAX_WBITS.
Against current:
moseley@bumby2:~$ diff -u Client.pm /usr/local/share/perl/5.10.0/RPC/XML/Client.pm
--- Client.pm 2010-01-06 13:35:59.000000000 -0800
+++ /usr/local/share/perl/5.10.0/RPC/XML/Client.pm 2010-01-06 13:38:05.000000000 -0800
@@ -336,8 +336,12 @@
if ($compression and (! $can_compress));
if ($compression)
{
+ $com_engine = Compress::Zlib::inflateInit(
+ WindowBits => -Compress::Zlib::MAX_WBITS(),
+ );
+
die "$me: Unable to initialize de-compression engine"
- unless ($com_engine = Compress::Zlib::inflateInit());
+ unless $com_engine;
}
}
To get deflated content to work need to set WindowBits. to -MAX_WBITS.
Against current:
moseley@bumby2:~$ diff -u Client.pm /usr/local/share/perl/5.10.0/RPC/XML/Client.pm
--- Client.pm 2010-01-06 13:35:59.000000000 -0800
+++ /usr/local/share/perl/5.10.0/RPC/XML/Client.pm 2010-01-06 13:38:05.000000000 -0800
@@ -336,8 +336,12 @@
if ($compression and (! $can_compress));
if ($compression)
{
+ $com_engine = Compress::Zlib::inflateInit(
+ WindowBits => -Compress::Zlib::MAX_WBITS(),
+ );
+
die "$me: Unable to initialize de-compression engine"
- unless ($com_engine = Compress::Zlib::inflateInit());
+ unless $com_engine;
}
}