[freeside-commits] freeside/fs_selfservice/FS-SelfService/cgi selfservice.cgi, 1.34, 1.35

Ivan,,, ivan at wavetail.420.am
Sun May 24 20:59:24 PDT 2009


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

Modified Files:
	selfservice.cgi 
Log Message:
international self-service payments, RT#1592

Index: selfservice.cgi
===================================================================
RCS file: /home/cvs/cvsroot/freeside/fs_selfservice/FS-SelfService/cgi/selfservice.cgi,v
retrieving revision 1.34
retrieving revision 1.35
diff -u -d -r1.34 -r1.35
--- selfservice.cgi	25 May 2009 01:49:34 -0000	1.34
+++ selfservice.cgi	25 May 2009 03:59:22 -0000	1.35
@@ -366,12 +366,15 @@
   $cgi->param('city') =~ /^(.{0,80})$/ or die "illegal city";
   my $city = $1;
 
-  $cgi->param('state') =~ /^(.{2})$/ or die "illegal state";
+  $cgi->param('state') =~ /^(.{80})$/ or die "illegal state";
   my $state = $1;
 
   $cgi->param('zip') =~ /^(.{0,10})$/ or die "illegal zip";
   my $zip = $1;
 
+  $cgi->param('country') =~ /^(.{0,2})$/ or die "illegal country";
+  my $country = $1;
+
   my $save = 0;
   $save = 1 if $cgi->param('save');
 
@@ -395,6 +398,7 @@
     'city'       => $city,
     'state'      => $state,
     'zip'        => $zip,
+    'country'    => $country,
     'save'       => $save,
     'auto'       => $auto,
     'paybatch'   => $paybatch,



More information about the freeside-commits mailing list