0.01

[Business-OnlinePayment-PayflowPro.git] / t / bad_auth.t

diff --git a/t/bad_auth.t b/t/bad_auth.t
index e0db291..2ed6e69 100644 (file)
--- a/t/bad_auth.t
+++ b/t/bad_auth.t
@@ -1,16 +1,17 @@
-BEGIN { $| = 1; print "1..2\n"; }
+BEGIN { $| = 1; print "1..1\n"; }
 
 use Business::OnlinePayment;
 
 my $tx = new Business::OnlinePayment("PayflowPro",
-#  'storename' => '000000',
-#  'keyfile'   => '/path/to/cert.pem',
-#  'lbin'      => '/path/to/lbin',
-#  'tmp'       => '/path/to/secure/tempdir',
+    #'vendor'    => 'your_vendor',
+    'partner'   => 'verisign',
+    'cert_path' => '/home/ivan/Business-OnlinePayment-PayflowPro.docs/verisign/payflowpro/linux/certs/',
 );
 
 $tx->content(
     type           => 'VISA',
+    login          => 'test231',
+    password       => '231test',
     action         => 'Normal Authorization',
     description    => 'Business::OnlinePayment::PayflowPro visa test',
     amount         => '0.01',
@@ -22,9 +23,10 @@ $tx->content(
     zip            => '84058',
     country        => 'US',
     email          => 'ivan-payflowpro@420.am',
-    card_number    => '4007000000027',
-    expiration     => '12/2002',
-#    result         => 'DECLINE',
+    #card_number    => '4007000000027',
+    #card_number    => '4111111111111111',
+    card_number    => '4111111111111112',
+    expiration     => '12/2004',
 );
 
 $tx->test_transaction(1);