don't run capture test without a live account

[Business-OnlinePayment-AuthorizeNet.git] / t / capture.t

diff --git a/t/capture.t b/t/capture.t
index c00ece1..7c40e9a 100644 (file)
--- a/t/capture.t
+++ b/t/capture.t
@@ -1,5 +1,6 @@
 BEGIN { $| = 1; print "1..2\n"; }
 
+#testing/testing is valid and seems to work... (but not for auth + capture)
 print "ok 1 # Skipped: need a valid Authorize.Net login/password to test\n";
 print "ok 2 # Skipped: need a valid Authorize.Net login/password to test\n";
 exit;
@@ -33,7 +34,7 @@ unless($tx->is_success()) {
     print "not ok 2\n";
 } else {
     my $order_number = $tx->order_number;
-    #warn $order_number;
+    warn $order_number;
     print "ok 1\n";
 
     my $settle_tx = new Business::OnlinePayment("AuthorizeNet");
@@ -45,7 +46,7 @@ unless($tx->is_success()) {
       description    => 'Business::OnlinePayment visa test',
       amount         => '49.95',
       invoice_number => '100100',
-      order_number   => $order_number,
+      order_number   => '111',
       card_number    => '4007000000027',
       expiration     => '08/06',
     );
@@ -56,7 +57,7 @@ unless($tx->is_success()) {
     if($settle_tx->is_success()) {
         print "ok 2\n";
     } else {
-        #warn $settle_tx->error_message;
+        warn $settle_tx->error_message;
         print "not ok 2\n";
     }