X-Git-Url: http://git.freeside.biz/gitweb/?p=Business-OnlinePayment-TransactionCentral.git;a=blobdiff_plain;f=t%2Fcredit_card_fs.t;fp=t%2Fcredit_card_fs.t;h=bf41b03b845adc961aff8dd9999862ea4a3f0f8e;hp=8fa2ee2fd5692e62bb54f68fdb3e558867e0b8de;hb=71bc7dda5b9f0d6127e05706186466c58881c8c1;hpb=5bdb1f2161dbaf2da95155ce9b4f3e880fcf477b diff --git a/t/credit_card_fs.t b/t/credit_card_fs.t index 8fa2ee2..bf41b03 100644 --- a/t/credit_card_fs.t +++ b/t/credit_card_fs.t @@ -7,6 +7,9 @@ if ( $@ ) { use Business::OnlinePayment; +require "t/lib/test_account.pl"; +my($login, $regkey) = test_account_or_skip(); + my $tx = new Business::OnlinePayment("TransactionCentral"); #$Business::OnlinePayment::HTTPS::DEBUG = 1; @@ -16,8 +19,8 @@ my $tx = new Business::OnlinePayment("TransactionCentral"); $tx->content( type => 'VISA', - login => '10011', - password => 'KK48NPYEJHMAH6DK', #regkey + login => $login, + password => $regkey, action => 'Normal Authorization', description => 'Business::OnlinePayment::TransactionCentral test', amount => '32',