[freeside-commits] freeside/FS/FS/ClientAPI MyAccount.pm, 1.133.2.10, 1.133.2.11

[Ivan,,,]

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

Modified Files:
      Tag: FREESIDE_2_3_BRANCH
	MyAccount.pm 
Log Message:
self-service API bank branch support, RT#13656

Index: MyAccount.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/FS/ClientAPI/MyAccount.pm,v
retrieving revision 1.133.2.10
retrieving revision 1.133.2.11
diff -u -w -d -r1.133.2.10 -r1.133.2.11
--- MyAccount.pm	28 Sep 2011 01:02:27 -0000	1.133.2.10
+++ MyAccount.pm	28 Sep 2011 01:34:23 -0000	1.133.2.11
@@ -547,7 +547,7 @@
     $p->{'payinfo1'} =~ /^([\dx]+)$/
       or return { 'error' => "illegal account number ". $p->{'payinfo1'} };
     my $payinfo1 = $1;
-     $p->{'payinfo2'} =~ /^([\dx]+)$/
+     $p->{'payinfo2'} =~ /^([\dx\.]+)$/ # . turned on by -require-bank-branch?
       or return { 'error' => "illegal ABA/routing number ". $p->{'payinfo2'} };
     my $payinfo2 = $1;
     $payinfo = $payinfo1. '@'. $payinfo2;