Description: Make utf8 compliant, from Erwan MAS <erwan@mas.nom.fr>
Bug-Debian: http://bugs.debian.org/393204
Forwarded: no
Author: Maurizio Lemmo (Tannoiser) <tannoiser@debian.org>
Reviewed-by: gregor herrmann <gregoa@debian.org>
Last-Update: 2011-02-13

--- a/lib/Frontier/RPC2.pm
+++ b/lib/Frontier/RPC2.pm
@@ -234,6 +234,7 @@
 	return ("<value><double>$value</double></value>");
     } else {
 	$value =~ s/([&<>\"])/$char_entities{$1}/ge;
+  $value =~ s/([\x{80}-\x{FFFF}])/'&#' . ord($1) . ';'/gse;
 	return ("<value><string>$value</string></value>");
     }
 }
