rjray / rpc-xml

A Perl implementation of the XML-RPC specification
https://metacpan.org/release/RPC-XML
24 stars 14 forks source link

initialize $do_compress #7

Closed kvar closed 10 years ago

kvar commented 12 years ago

If the server sends a compressed response, $do_compress remains set to 1 for the next request. So the server always tries to uncompress the next request, even when it's not really compressed (which causes it to fail). This initializes $do_compress = 0 before checking the request for compression.