Commit 283d5785 authored by mkanat%bugzilla.org's avatar mkanat%bugzilla.org

Bug 486306: Truncated XML-RPC response (incorrect content-length header)

Patch by Max Kanat-Alexander <mkanat@bugzilla.org> r=LpSolit, a=LpSolit
parent 27cc3de6
...@@ -219,9 +219,9 @@ sub OPTIONAL_MODULES { ...@@ -219,9 +219,9 @@ sub OPTIONAL_MODULES {
{ {
package => 'SOAP-Lite', package => 'SOAP-Lite',
module => 'SOAP::Lite', module => 'SOAP::Lite',
version => 0, # 0.710.04 is required for correct UTF-8 handling, but .04 and .05 are
# These versions (0.70 -> 0.710.05) are affected by bug 468009 # affected by bug 468009.
blacklist => ['^0\.70', '^0\.710?\.0[1-5]$'], version => '0.710.06',
feature => ['xmlrpc'], feature => ['xmlrpc'],
}, },
{ {
......
...@@ -149,16 +149,6 @@ sub new { ...@@ -149,16 +149,6 @@ sub new {
return $self; return $self;
} }
sub as_string {
my $self = shift;
my ($value) = @_;
# Something weird happens with XML::Parser when we have upper-ASCII
# characters encoded as UTF-8, and this fixes it.
utf8::encode($value) if utf8::is_utf8($value)
&& $value =~ /^[\x00-\xff]+$/;
return $self->SUPER::as_string($value);
}
# Here the XMLRPC::Serializer is extended to use the XMLRPC nil extension. # Here the XMLRPC::Serializer is extended to use the XMLRPC nil extension.
sub encode_object { sub encode_object {
my $self = shift; my $self = shift;
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment