Merge pull request #5 from alexrj/utf8-encode

Use utf8::encode() instead of utf8::downgrade()
rjray · Feb 5, 2014 · c00cd56 · c00cd56
2 parents 10b4ccc + 0379d06
commit c00cd56
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 2 deletions.
diff --git a/lib/RPC/XML.pm b/lib/RPC/XML.pm
@@ -424,7 +424,7 @@ sub length ## no critic (ProhibitBuiltinHomonyms)
 {
     my $self = shift;
 
-    utf8::downgrade(my $str = $self->as_string);
+    utf8::encode(my $str = $self->as_string);
 
     return length $str;
 }

diff --git a/lib/RPC/XML/Client.pm b/lib/RPC/XML/Client.pm
@@ -352,7 +352,7 @@ sub send_request ## no critic (ProhibitExcessComplexity)
     else
     {
         # Treat the content strictly in-memory
-        utf8::downgrade($content = $req->as_string);
+        utf8::encode($content = $req->as_string);
         if ($do_compress)
         {
             $content = Compress::Zlib::compress($content);