From 1f19e67636476c7119cfb41920c5b176e617c697 Mon Sep 17 00:00:00 2001
From: Ivan Kohler <ivan@freeside.biz>
Date: Sun, 28 Oct 2012 23:27:17 -0700
Subject: gateway URL change

---
 t/card.t              | 6 +++---
 t/lib/test_account.pl | 2 +-
 2 files changed, 4 insertions(+), 4 deletions(-)

(limited to 't')

diff --git a/t/card.t b/t/card.t
index 5a227ae..9c021d6 100644
--- a/t/card.t
+++ b/t/card.t
@@ -61,8 +61,8 @@ my $voidable_amount = 0;
     $tx,
     desc          => "invalid card_number",
     is_success    => 0,
-    result_code   => '912',
-    error_message => 'INVALID CARD NUMBER',
+    result_code   => '900', #'912' with old jetpay gw
+    error_message => 'Invalid card number.  ', #'INVALID CARD NUMBER' w/old gw
     authorization => qr/^$/,
     avs_code      => '',           # so rather pointless :\
     cvv2_response => '',           # ...
@@ -91,7 +91,7 @@ my $voidable_amount = 0;
 
 # authorization void test
 {
-  my $tx = Business::OnlinePayment->new("IPPay", @opts);
+  my $tx = Business::OnlinePayment->new("IPPay", %opt);
   $tx->content(%content, action => 'authorization only',  amount => '3.00' );
   $tx->test_transaction(1);
   $tx->submit;
diff --git a/t/lib/test_account.pl b/t/lib/test_account.pl
index 06a2428..1133ea0 100644
--- a/t/lib/test_account.pl
+++ b/t/lib/test_account.pl
@@ -12,7 +12,7 @@ sub test_account_or_skip {
 sub test_account {
     my $suffix = shift || 'card';
 
-    my($login, $password) = ('TESTMERCHANT', '');
+    my($login, $password) = ('TESTTERMINAL', '');
 
     my %opt;
     if ( $suffix eq 'check ' ) {
-- 
cgit v1.2.1