Don't default programdesc to our real phone number.

diff --git a/Changes b/Changes
index 32ef799..4f163cf 100644 (file)
--- 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 (file)
--- 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';