Strip off non-Latin-1 characters

diff --git a/InternetSecure.pm b/InternetSecure.pm
index b9ca589..691d72b 100755 (executable)
--- a/InternetSecure.pm
+++ b/InternetSecure.pm
@@ -210,11 +210,10 @@ sub to_xml {
                                );
        }
 
-       # The encode() is somewhat of a NOOP, but XML::Simple has some issues
-       # with the utf8 flag.
+       # The encode() makes sure to a) strip off non-Latin-1 characters, and
+       # b) turn off the utf8 flag, which confuses XML::Simple
        encode('ISO-8859-1', xml_out(\%data,
                NoAttr          => 1,
-               NumericEscape   => 1,
                RootName        => 'TranxRequest',
                SuppressEmpty   => undef,
                XMLDecl         => '<?xml version="1.0" encoding="iso-8859-1" standalone="yes"?>',