From 8073b48748fd5be813f4ac61fa4cf4d57570a6ac Mon Sep 17 00:00:00 2001 From: ivan Date: Fri, 6 Nov 2009 22:10:21 +0000 Subject: [PATCH] Don't default programdesc to our real phone number. --- Changes | 3 +++ lib/Business/OnlinePayment/Jety.pm | 23 +++++++++++------------ 2 files changed, 14 insertions(+), 12 deletions(-) diff --git a/Changes b/Changes index 32ef799..4f163cf 100644 --- a/Changes +++ b/Changes @@ -1,5 +1,8 @@ Revision history for Business-OnlinePayment-Jety +0.03 Fri Nov 6 13:32:06 PST 2009 + - Don't default programdesc to our real phone number. + 0.02 Fri Nov 6 11:45:48 PST 2009 - Use 111-111-1111 if no phone number is provided. diff --git a/lib/Business/OnlinePayment/Jety.pm b/lib/Business/OnlinePayment/Jety.pm index 6396912..a272e8e 100644 --- a/lib/Business/OnlinePayment/Jety.pm +++ b/lib/Business/OnlinePayment/Jety.pm @@ -10,7 +10,7 @@ use Date::Format; use Tie::IxHash; @ISA = qw(Business::OnlinePayment::HTTPS); -$VERSION = '0.02'; +$VERSION = '0.03'; $me = 'Business::OnlinePayment::Jety'; $DEBUG = 0; @@ -39,17 +39,17 @@ my @fields = (qw( )); my %map = ( - login => 'username', - first_name => 'firstname', - last_name => 'lastname', - address => 'address1', - bank_name => 'bankname', - bank_city => 'bankcity', - bank_state => 'bankstate', - account_number => 'accountdda', - routing_code => 'accountaba', + 'login' => 'username', + 'first_name' => 'firstname', + 'last_name' => 'lastname', + 'address' => 'address1', + 'bank_name' => 'bankname', + 'bank_city' => 'bankcity', + 'bank_state' => 'bankstate', + 'account_number' => 'accountdda', + 'routing_code' => 'accountaba', + 'description' => 'programdesc', ); - sub set_defaults { my $self = shift; @@ -71,7 +71,6 @@ sub map_fields { if(lc($content->{action}) ne 'normal authorization'); $content->{'function'} = 'echeck'; - $content->{'programdesc'} = "415-462-1624 Business::OnlinePayment::Jety v$VERSION"; $content->{'ref'} = time2str('%Y%m%d',time).'-'.int(rand(1000000)); $content->{'phone'} ||= '111-111-1111'; -- 2.11.0