diff options
| author | ivan <ivan> | 2012-01-13 03:37:01 +0000 |
|---|---|---|
| committer | ivan <ivan> | 2012-01-13 03:37:01 +0000 |
| commit | f5d62095722c3756c897db1903bddb1a9aad3a06 (patch) | |
| tree | c1d8a3d4e313049d856195948f9a84ed56e3bf4d /FS/FS/cust_pay_void.pm | |
| parent | dca3075bbe71ae43dbd84d70bad749207b81e6b0 (diff) | |
fix voids of CF transactions, RT#16050
Diffstat (limited to 'FS/FS/cust_pay_void.pm')
| -rw-r--r-- | FS/FS/cust_pay_void.pm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/FS/FS/cust_pay_void.pm b/FS/FS/cust_pay_void.pm index 1e22e1c..f1193cd 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'); } |