0.06: fix january bug in tests

[Business-OnlinePayment-IPPay.git] / t / check.t

diff --git a/t/check.t b/t/check.t
index 7e05a52..721e23a 100644 (file)
--- a/t/check.t
+++ b/t/check.t
@@ -1,8 +1,9 @@
 #!/usr/bin/perl -w
 
 use Test::More;
+require "t/lib/test_account.pl";
 
-my($login, $password, %opt) = ('TESTMERCHANT', '', 'Origin' => 'RECURRING' );
+my($login, $password, %opt) = test_account_or_skip('check');
 plan tests => 16;
 
 use_ok 'Business::OnlinePayment';