Patch by Max Kanat-Alexander <mkanat@bugzilla.org> r=LpSolit, a=LpSolit
{
package => 'SOAP-Lite',
module => 'SOAP::Lite',
- version => 0,
- # These versions (0.70 -> 0.710.05) are affected by bug 468009
- blacklist => ['^0\.70', '^0\.710?\.0[1-5]$'],
+ # 0.710.04 is required for correct UTF-8 handling, but .04 and .05 are
+ # affected by bug 468009.
+ version => '0.710.06',
feature => 'XML-RPC Interface'
},
{
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.
sub encode_object {
my $self = shift;