[freeside-commits] freeside/fs_selfservice/FS-SelfService/cgi signup.cgi, 1.19, 1.19.2.1 agent.cgi, 1.10, 1.10.12.1 selfservice.cgi, 1.59, 1.59.2.1

[Ivan,,,]

Update of /home/cvs/cvsroot/freeside/fs_selfservice/FS-SelfService/cgi
In directory wavetail.420.am:/tmp/cvs-serv27048/fs_selfservice/FS-SelfService/cgi

Modified Files:
      Tag: FREESIDE_2_3_BRANCH
	signup.cgi agent.cgi selfservice.cgi 
Log Message:
isracard support in self-service and backend payment processing, RT#13894

Index: selfservice.cgi
===================================================================
RCS file: /home/cvs/cvsroot/freeside/fs_selfservice/FS-SelfService/cgi/selfservice.cgi,v
retrieving revision 1.59
retrieving revision 1.59.2.1
diff -u -w -d -r1.59 -r1.59.2.1
--- selfservice.cgi	14 Jul 2011 03:46:17 -0000	1.59
+++ selfservice.cgi	2 Aug 2011 20:17:02 -0000	1.59.2.1
@@ -493,7 +493,7 @@
 
   my $payinfo = $cgi->param('payinfo');
   $payinfo =~ s/[^\dx]//g;
-  $payinfo =~ /^([\dx]{13,16})$/
+  $payinfo =~ /^([\dx]{13,16}|[\dx]{8,9})$/
     #or $error ||= $init_data->{msgcat}{invalid_card}; #. $self->payinfo;
     or die "illegal card"; #!!!
   $payinfo = $1;

Index: signup.cgi
===================================================================
RCS file: /home/cvs/cvsroot/freeside/fs_selfservice/FS-SelfService/cgi/signup.cgi,v
retrieving revision 1.19
retrieving revision 1.19.2.1
diff -u -w -d -r1.19 -r1.19.2.1
--- signup.cgi	20 Jul 2011 21:16:18 -0000	1.19
+++ signup.cgi	2 Aug 2011 20:17:02 -0000	1.19.2.1
@@ -201,7 +201,7 @@
       my $payinfo = $cgi->param('payinfo');
       $payinfo =~ s/\D//g;
 
-      $payinfo =~ /^(\d{13,16})$/
+      $payinfo =~ /^(\d{13,16}|\d{8,9})$/
         or $error ||= $init_data->{msgcat}{invalid_card}; #. $self->payinfo;
       $payinfo = $1;
       validate($payinfo)

Index: agent.cgi
===================================================================
RCS file: /home/cvs/cvsroot/freeside/fs_selfservice/FS-SelfService/cgi/agent.cgi,v
retrieving revision 1.10
retrieving revision 1.10.12.1
diff -u -w -d -r1.10 -r1.10.12.1
--- agent.cgi	23 Oct 2006 08:30:17 -0000	1.10
+++ agent.cgi	2 Aug 2011 20:17:02 -0000	1.10.12.1
@@ -150,7 +150,7 @@
     my $payinfo = $cgi->param('payinfo');
     $payinfo =~ s/\D//g;
 
-    $payinfo =~ /^(\d{13,16})$/
+    $payinfo =~ /^(\d{13,16}|\d{8,9})$/
       or $error ||= $init_data->{msgcat}{invalid_card}; #. $self->payinfo;
     $payinfo = $1;
     validate($payinfo)