From: fbriere Date: Tue, 14 Feb 2006 04:58:48 +0000 (+0000) Subject: s/xxxCardNumber/xxxCard_Number/ X-Git-Tag: V0_01~44 X-Git-Url: http://git.freeside.biz/gitweb/?p=Business-OnlinePayment-InternetSecure.git;a=commitdiff_plain;h=ec514ddd2bf0251c9223cba84de63a96694a7457 s/xxxCardNumber/xxxCard_Number/ --- diff --git a/InternetSecure.pm b/InternetSecure.pm index 86e16e2..3887c8b 100755 --- a/InternetSecure.pm +++ b/InternetSecure.pm @@ -157,7 +157,7 @@ sub to_xml { $content{taxes} = uc $content{taxes}; my %data = $self->get_remap_fields(qw( - xxxCardNumber card_number + xxxCard_Number card_number xxxName name xxxCompany company @@ -182,7 +182,7 @@ sub to_xml { $data{MerchantNumber} = $self->merchant_id; - $data{xxxCardNumber} =~ tr/ //d; + $data{xxxCard_Number} =~ tr/ //d; my ($y, $m) = $self->parse_expdate($content{exp_date}); $data{xxxCCYear} = sprintf '%.4u' => $y; diff --git a/t/20emit.t b/t/20emit.t index a162f10..6cff57c 100755 --- a/t/20emit.t +++ b/t/20emit.t @@ -86,7 +86,7 @@ __DATA__ 0000 - 0000000000000000 + 0000000000000000 07 2004 1 @@ -115,7 +115,7 @@ __DATA__ 0000 - 0000000000000000 + 0000000000000000 07 2004 0