[freeside-commits] freeside/FS/FS cust_pay_void.pm, 1.14.2.1, 1.14.2.2

[Ivan,,,]

Update of /home/cvs/cvsroot/freeside/FS/FS
In directory wavetail.420.am:/tmp/cvs-serv27022

Modified Files:
      Tag: FREESIDE_2_3_BRANCH
	cust_pay_void.pm 
Log Message:
fix voids of CF transactions, RT#16050

Index: cust_pay_void.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/FS/cust_pay_void.pm,v
retrieving revision 1.14.2.1
retrieving revision 1.14.2.2
diff -u -w -d -r1.14.2.1 -r1.14.2.2
--- cust_pay_void.pm	22 Jul 2011 17:27:11 -0000	1.14.2.1
+++ cust_pay_void.pm	13 Jan 2012 03:37:01 -0000	1.14.2.2
@@ -211,7 +211,8 @@
         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');
     }