X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=FS%2FFS%2Fcust_main.pm;fp=FS%2FFS%2Fcust_main.pm;h=3df17bc627e54bcb95ff7ebe2f09100bcb689483;hp=a25321a10fc549225a39791495e490d9576c9bc1;hb=159e3b1170a3011738e0937ea1b155488ee5a83c;hpb=74f252e841ae742b7defe1042e8e9d3d7c513867 diff --git a/FS/FS/cust_main.pm b/FS/FS/cust_main.pm index a25321a10..3df17bc62 100644 --- a/FS/FS/cust_main.pm +++ b/FS/FS/cust_main.pm @@ -2132,7 +2132,7 @@ sub check { sub check_payinfo_cardtype { my $self = shift; - return '' unless $self->payby =~ /^(CARD|CHEK)$/; + return '' unless $self->payby =~ /^(CARD|DCRD)$/; my $payinfo = $self->payinfo; $payinfo =~ s/\D//g;