From: ivan <ivan>
Date: Fri, 13 Jan 2012 03:37:02 +0000 (+0000)
Subject: fix voids of CF transactions, RT#16050
X-Git-Tag: freeside_2_3_1~28
X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=commitdiff_plain;h=c5588173be7a36ee82a037e3809e6ecc7f14917f

fix voids of CF transactions, RT#16050
---

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');
     }