diff options
| author | Ivan Kohler <ivan@freeside.biz> | 2016-01-26 20:16:02 -0800 |
|---|---|---|
| committer | Ivan Kohler <ivan@freeside.biz> | 2016-01-26 20:16:02 -0800 |
| commit | a7699a90fb44c8a935c8f980dd8f8350ac9d2d81 (patch) | |
| tree | 2006704bc5eb8bdeac35006177a10c273dd68d90 /FS/FS/cust_payby.pm | |
| parent | 1329148a0187e7ccf5e77680ea5208e3456858da (diff) | |
respect card-types config in backend (new customer payment types / 4.x), RT#39861
Diffstat (limited to 'FS/FS/cust_payby.pm')
| -rw-r--r-- | FS/FS/cust_payby.pm | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/FS/FS/cust_payby.pm b/FS/FS/cust_payby.pm index 79a1468..9111fdf 100644 --- a/FS/FS/cust_payby.pm +++ b/FS/FS/cust_payby.pm @@ -496,6 +496,8 @@ sub check { sub check_payinfo_cardtype { my $self = shift; + return '' unless $self->payby =~ /^(CARD|CHEK)$/; + my $payinfo = $self->payinfo; $payinfo =~ s/\D//g; |