From: fbriere <fbriere>
Date: Sat, 18 Feb 2006 06:01:35 +0000 (+0000)
Subject: Let's not encode high-bit ISO-8859-1 characters
X-Git-Tag: V0_01~6
X-Git-Url: http://git.freeside.biz/gitweb/?p=Business-OnlinePayment-InternetSecure.git;a=commitdiff_plain;h=5de2c28522463bdf8da5f061119794799ea147b6

Let's not encode high-bit ISO-8859-1 characters
---

diff --git a/InternetSecure.pm b/InternetSecure.pm
index cb6d00e..b9ca589 100755
--- a/InternetSecure.pm
+++ b/InternetSecure.pm
@@ -210,13 +210,15 @@ sub to_xml {
 				);
 	}
 
-	xml_out(\%data,
+	# The encode() is somewhat of a NOOP, but XML::Simple has some issues
+	# with the utf8 flag.
+	encode('ISO-8859-1', xml_out(\%data,
 		NoAttr		=> 1,
-		NumericEscape	=> 2,
+		NumericEscape	=> 1,
 		RootName	=> 'TranxRequest',
 		SuppressEmpty	=> undef,
 		XMLDecl		=> '<?xml version="1.0" encoding="iso-8859-1" standalone="yes"?>',
-	);
+	));
 }
 
 # Map the various fields from the response, and put their values into our