From: fbriere <fbriere>
Date: Tue, 14 Feb 2006 01:50:23 +0000 (+0000)
Subject: Let XML::Simple handle undefs itself
X-Git-Tag: V0_01~45
X-Git-Url: http://git.freeside.biz/gitweb/?p=Business-OnlinePayment-InternetSecure.git;a=commitdiff_plain;h=4f7f63abf30377deba653d2704df43c11061bb66

Let XML::Simple handle undefs itself
---

diff --git a/InternetSecure.pm b/InternetSecure.pm
index b90f187..86e16e2 100755
--- a/InternetSecure.pm
+++ b/InternetSecure.pm
@@ -75,10 +75,6 @@ sub get_remap_fields {
 	$self->remap_fields(reverse %map);
 	my %data = $self->get_fields(keys %map);
 
-	foreach (values %data) {
-		$_ = '' unless defined;
-	}
-
 	return %data;
 }
 
@@ -219,6 +215,7 @@ sub to_xml {
 	xml_out(\%data,
 		NoAttr => 1,
 		RootName => 'TranxRequest',
+		SuppressEmpty => undef,
 		XMLDecl => '<?xml version="1.0" encoding="utf-8" standalone="yes"?>',
 	);
 }