← Back to branch summary

~ubuntu-branches/ubuntu/saucy/libbusiness-onlinepayment-ippay-perl/saucy

« back to all changes in this revision

Viewing changes to t/lib/test_account.pl

  • Committer: Package Import Robot
  • Author(s): Xavier Guimard
  • Date: 2013-05-12 13:04:17 UTC
  • mto: This revision was merged to the branch mainline in revision 7.
  • Revision ID: package-import@ubuntu.com-20130512130417-3u8lp6rjqa9xx0fh
Tags: upstream-0.08
Import upstream version 0.08

Show diffs side-by-side

added added

removed removed

Lines of Context:
t/lib/test_account.pl
12
12
sub test_account {
13
13
    my $suffix = shift || 'card';
14
14
 
15
 
    my($login, $password) = ('TESTMERCHANT', '');
 
15
    my($login, $password) = ('TESTTERMINAL', '');
16
16
 
17
17
    my %opt;
18
18
    if ( $suffix eq 'check ' ) {