X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=t%2Freturn_card_visa.t;h=5cef5294555bb8485d4d5389ae81eb526adeff84;hb=08820e2ca4d9f6f3cb1b9ca3a620d2a570cc37b1;hp=c717d792fbfe634efd10d11affaf14f44f61c746;hpb=9751024873641a07657bec7f11597ae18cf63207;p=Business-OnlinePayment-Skipjack.git

diff --git a/t/return_card_visa.t b/t/return_card_visa.t
index c717d79..5cef529 100644
--- a/t/return_card_visa.t
+++ b/t/return_card_visa.t
@@ -14,9 +14,13 @@ my $tx = new Business::OnlinePayment("Skipjack");
 #$Business::OnlinePayment::Skipjack::DEBUG = 1;
 #$Business::OnlinePayment::Skipjack::DEBUG = 1;
 
+my $login = $ENV{'sj_html_serial_number'} || '000843232776';
+my $password = $ENV{'sj_devel_serial_number'} || '100025931874';
+
 $tx->content(
     type           => 'VISA',
-    login          => '000368452762', # "HTML serial number"
+    login          => $login, # "HTML serial number"
+    password       => $password, # "Developer serial number"
     action         => 'Normal Authorization',
     description    => 'Business::OnlinePayment::Skipjack test',
     amount         => '32',
@@ -48,8 +52,8 @@ my $pa_tx = new Business::OnlinePayment("Skipjack");
 
 $pa_tx->content(
     type  => 'VISA',
-    login          => '000368452762', # "HTML serial number"
-    password       => '100594217288', # "developer serial number"
+    login          => $login, # "HTML serial number"
+    password       => $password, # "Developer serial number"
     action         => 'Post Authorization',
     description    => 'Business::OnlinePayment::Skipjack test',
     order_number   => $tx->order_number(),
@@ -76,8 +80,8 @@ my $st_tx = new Business::OnlinePayment("Skipjack");
 
 $st_tx->content(
     type  => 'VISA',
-    login          => '000368452762', # "HTML serial number"
-    password       => '100594217288', # "developer serial number"
+    login          => $login, # "HTML serial number"
+    password       => $password, # "Developer serial number"
     action         => 'Status',
     description    => 'Business::OnlinePayment::Skipjack test',
     order_number   => $tx->order_number(),
@@ -106,8 +110,8 @@ my $cr_tx = new Business::OnlinePayment("Skipjack");
 
 $cr_tx->content(
     type           => 'VISA',
-    login          => '000368452762', # "HTML serial number"
-    password       => '100594217288', # "developer serial number"
+    login          => $login, # "HTML serial number"
+    password       => $password, # "Developer serial number"
     action         => 'Credit',
     description    => 'Business::OnlinePayment::Skipjack test',
     amount         => 11,