X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=FS%2FFS%2Fcust_pay_void.pm;h=f1193cd24878f6fa30d33d0ad90115a881450218;hp=1e22e1c09b2bd3f3713ab08c8a3cb4394f563f9e;hb=c5588173be7a36ee82a037e3809e6ecc7f14917f;hpb=c7c6a9bf1d1f66b5aaf82b2836cd560b64b768a8 diff --git a/FS/FS/cust_pay_void.pm b/FS/FS/cust_pay_void.pm index 1e22e1c09..f1193cd24 100644 --- a/FS/FS/cust_pay_void.pm +++ b/FS/FS/cust_pay_void.pm @@ -211,7 +211,8 @@ sub check { or return "Illegal (mistyped?) credit card number (payinfo)"; $self->payinfo($1); validate($self->payinfo) or return "Illegal credit card number"; - return "Unknown card type" if cardtype($self->payinfo) eq "Unknown"; + return "Unknown card type" if $self->payinfo !~ /^99\d{14}$/ #token + && cardtype($self->payinfo) eq "Unknown"; } else { $self->payinfo('N/A'); }