From: fbriere Date: Sat, 18 Feb 2006 06:08:01 +0000 (+0000) Subject: Strip off non-Latin-1 characters X-Git-Tag: V0_01~5 X-Git-Url: http://git.freeside.biz/gitweb/?a=commitdiff_plain;h=abfaffd4ec256d040eec52ef0d8dc14d870c2433;p=Business-OnlinePayment-InternetSecure.git Strip off non-Latin-1 characters --- diff --git a/InternetSecure.pm b/InternetSecure.pm index b9ca589..691d72b 100755 --- 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 => '',