diff options
| -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; |