update missed bad_card_mc.t to new test account

diff --git a/Changes b/Changes
index 4ff637c..c005e4e 100644 (file)
--- a/Changes
+++ b/Changes
@@ -1,5 +1,8 @@
 Revision history for Perl extension Business::OnlinePayment::SkipJack
 
+0.3     unreleased
+        - update missed bad_card_mc.t to new test account
+
 0.2    Wed Apr 11 14:11:28 PDT 2007
         - clarify licensing (no original code remains)
         - fix tests

diff --git a/t/bad_card_mc.t b/t/bad_card_mc.t
index 3791d1b..25eaac8 100644 (file)
--- a/t/bad_card_mc.t
+++ b/t/bad_card_mc.t
@@ -14,8 +14,8 @@ my $tx = new Business::OnlinePayment("Skipjack");
 #$Business::OnlinePayment::Skipjack::DEBUG = 1;
 #$Business::OnlinePayment::Skipjack::DEBUG = 1;
 
-my $login = $ENV{'sj_html_serial_number'} || '000944785470';
-my $password = $ENV{'sj_devel_serial_number'} || '100594217288';
+my $login = $ENV{'sj_html_serial_number'} || '000843232776';
+my $password = $ENV{'sj_devel_serial_number'} || '100025931874';
 
 $tx->content(
     type           => 'VISA',