From a1a70f1e5b213a6e235a97d22cdf362555780832 Mon Sep 17 00:00:00 2001 From: mark Date: Fri, 19 Mar 2010 07:25:07 +0000 Subject: [PATCH] Add "credit" as a synonym for "void" --- Changes | 3 +++ lib/Business/OnlinePayment/Jety.pm | 7 +++++-- 2 files changed, 8 insertions(+), 2 deletions(-) diff --git a/Changes b/Changes index 2785963..5a53206 100644 --- a/Changes +++ b/Changes @@ -1,5 +1,8 @@ Revision history for Business-OnlinePayment-Jety +0.08 Fri Mar 19 00:22:40 PDT 2010 + - Add "credit" as a synonym for "void". + 0.07 Wed Mar 10 21:27:53 PST 2010 - Add _info support. - Fix incorrect use of order_number instead of authorization. diff --git a/lib/Business/OnlinePayment/Jety.pm b/lib/Business/OnlinePayment/Jety.pm index 8d563d8..a10c64e 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.07'; +$VERSION = '0.08'; $me = 'Business::OnlinePayment::Jety'; $DEBUG = 0; @@ -18,6 +18,7 @@ $DEBUG = 0; my %trans_type = ( 'normal authorization' => 'echeck', 'void' => 'ereturn', + 'credit' => 'ereturn', ); my %map = ( @@ -54,6 +55,7 @@ my %map = ( 'amount' => sub { my %c = @_; sprintf("%.02f",$c{'amount'}) }, ], ); +$map{'credit'} = $map{'void'}; my %defaults = ( # using the B:OP names 'phone' => '111-111-1111', @@ -90,6 +92,7 @@ my %required = ( amount ) ], ); +$required{'credit'} = $required{'void'}; sub _info { { @@ -98,7 +101,7 @@ sub _info { gateway_url => 'http://www.jetypay.com', module_version => $VERSION, supported_types => [ 'ECHECK' ], - supported_actions => [ 'Normal Authorization', 'Void' ], + supported_actions => [ 'Normal Authorization', 'Void', 'Credit' ], ECHECK_void_requires_account => 1, } } -- 2.20.1