From c912aea692222adad3b6fb81d256de426cfc6ff7 Mon Sep 17 00:00:00 2001 From: ivan Date: Fri, 6 Nov 2009 21:09:33 +0000 Subject: [PATCH] Use 111-111-1111 if no phone number is provided. --- Changes | 3 +++ lib/Business/OnlinePayment/Jety.pm | 6 ++++-- 2 files changed, 7 insertions(+), 2 deletions(-) diff --git a/Changes b/Changes index 457f7de..32ef799 100644 --- a/Changes +++ b/Changes @@ -1,5 +1,8 @@ Revision history for Business-OnlinePayment-Jety +0.02 Fri Nov 6 11:45:48 PST 2009 + - Use 111-111-1111 if no phone number is provided. + 0.01 Wed Oct 21 21:38:52 PDT 2009 First version, released on an unsuspecting world. diff --git a/lib/Business/OnlinePayment/Jety.pm b/lib/Business/OnlinePayment/Jety.pm index 890152e..6396912 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.01'; +$VERSION = '0.02'; $me = 'Business::OnlinePayment::Jety'; $DEBUG = 0; @@ -71,9 +71,11 @@ sub map_fields { if(lc($content->{action}) ne 'normal authorization'); $content->{'function'} = 'echeck'; - $content->{'programdesc'} = '415-462-1624 Business::OnlinePayment::Jety'; + $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'; + $content->{'bankname'} ||= 'unknown'; $content->{'bankcity'} ||= 'unknown'; $content->{'bankstate'} ||= 'XX'; -- 2.11.0