diff options
| author | Ivan Kohler <ivan@freeside.biz> | 2016-01-26 20:15:58 -0800 |
|---|---|---|
| committer | Ivan Kohler <ivan@freeside.biz> | 2016-01-26 20:15:58 -0800 |
| commit | c4e788ef6f21b5a8582a1005512a15ba2f022945 (patch) | |
| tree | 5e2e55bb59d8c80c0f866710854d97c58b1b5f95 /FS/FS/cust_payby.pm | |
| parent | 461cf66878e2d63d0360184aeeebcbc0e45acfb9 (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 79a146858..9111fdff1 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; |