diff options
author | Ivan Kohler <ivan@freeside.biz> | 2013-06-21 13:55:17 -0700 |
---|---|---|
committer | Ivan Kohler <ivan@freeside.biz> | 2013-06-21 13:55:17 -0700 |
commit | 8552a65db4413334d7755f6c1228da3dcdb92dcc (patch) | |
tree | 7d56c0684fc11b1678df7d749e3484d32a9ec542 | |
parent | 327f376d26a38ae2f1a02ca9a53fad43464b087b (diff) |
Don't test the (now unsupported) ACH voiding, fixes: CPAN#86161
-rw-r--r-- | t/check.t | 29 |
1 files changed, 15 insertions, 14 deletions
@@ -4,7 +4,7 @@ use Test::More; require "t/lib/test_account.pl"; my($login, $password, %opt) = test_account_or_skip('check'); -plan tests => 16; +plan tests => 11; use_ok 'Business::OnlinePayment'; @@ -40,19 +40,20 @@ my $voidable; $voidable = $ctx->order_number if $ctx->is_success; } -#check void test -{ - my $ctx = Business::OnlinePayment->new("IPPay", %opt); - $ctx->content(%content, action => 'void', order_number => $voidable); - tx_check( - $ctx, - desc => 'ACH void transaction', - is_success => 1, - result_code => '000', - error_message => 'CHECK ACCEPTED', - authorization => qr/^000000$/, - ); -} +#VOIDACH transactions are no longer supported. Please contact support@ippay.com for questions. +##check void test +#{ +# my $ctx = Business::OnlinePayment->new("IPPay", %opt); +# $ctx->content(%content, action => 'void', order_number => $voidable); +# tx_check( +# $ctx, +# desc => 'ACH void transaction', +# is_success => 1, +# result_code => '000', +# error_message => 'CHECK ACCEPTED', +# authorization => qr/^000000$/, +# ); +#} #check credit test { |