diff options
| author | Jonathan Prykop <jonathan@freeside.biz> | 2017-01-03 19:15:22 -0600 |
|---|---|---|
| committer | Jonathan Prykop <jonathan@freeside.biz> | 2017-01-03 19:15:22 -0600 |
| commit | d7590a1aa7d3accb0329f0579ffa167b3a67e184 (patch) | |
| tree | 53c861c293c9036f66cd3cb34b077d0db38ee85a /FS/t/suite/15-activate_encryption.t | |
| parent | bbaaff786a27e08d7f8f1e13e5c24d07c31c605f (diff) | |
71513: Card tokenization [test tweak, v4 only]
Diffstat (limited to 'FS/t/suite/15-activate_encryption.t')
| -rwxr-xr-x | FS/t/suite/15-activate_encryption.t | 18 |
1 files changed, 17 insertions, 1 deletions
diff --git a/FS/t/suite/15-activate_encryption.t b/FS/t/suite/15-activate_encryption.t index e5732f736..dec130b7f 100755 --- a/FS/t/suite/15-activate_encryption.t +++ b/FS/t/suite/15-activate_encryption.t @@ -2,7 +2,7 @@ use strict; use FS::Test; -use Test::More tests => 13; +use Test::More tests => 15; use FS::Conf; use FS::UID qw( dbh ); use DateTime; @@ -16,6 +16,22 @@ my @tables = qw(cust_payby cust_pay_pending cust_pay cust_pay_void cust_refund); ### can only run on test database (company name "Freeside Test") like( $conf->config('company_name'), qr/^Freeside Test/, 'using test database' ) or BAIL_OUT(''); +### remove gateway overrides and set non-tokenizing default gateway +### so that we play nicely with tokenization upgrades +### (though really, should just get rid of cardtype overrides in test db) +# these will just get in the way for now +foreach my $apg ($fs->qsearch('agent_payment_gateway')) { + $err = $apg->delete; + last if $err; +} +ok( !$err, 'removing agent gateway overrides' ) or BAIL_OUT($err); + +my $bopconf = +'IPPay +TESTTERMINAL'; +$conf->set('business-onlinepayment' => $bopconf); +is( join("\n",$conf->config('business-onlinepayment')), $bopconf, "set default gateway" ) or BAIL_OUT(''); + ### we need to unencrypt our test db before we can test turning it on # temporarily load all payinfo into memory |