freeside/fs_signup/FS-SignupClient/cgi signup.cgi,1.53,1.54

ivan ivan at pouncequick.420.am
Wed Dec 1 10:38:25 PST 2004


Update of /home/cvs/cvsroot/freeside/fs_signup/FS-SignupClient/cgi
In directory pouncequick:/tmp/cvs-serv8485

Modified Files:
	signup.cgi 
Log Message:
add processing for ship state/county/country

Index: signup.cgi
===================================================================
RCS file: /home/cvs/cvsroot/freeside/fs_signup/FS-SignupClient/cgi/signup.cgi,v
retrieving revision 1.53
retrieving revision 1.54
diff -u -d -r1.53 -r1.54
--- signup.cgi	22 Nov 2004 18:20:21 -0000	1.53
+++ signup.cgi	1 Dec 2004 18:38:22 -0000	1.54
@@ -166,6 +166,21 @@
     } else {
       die "illegal state: ". $cgi->param('state');
     }
+    if ( $cgi->param('ship_state') =~ /^(\w*)( \(([\w ]+)\))? ?\/ ?(\w+)$/ ) {
+      $ship_state = $1;
+      $ship_county = $3 || '';
+      $ship_country = $4;
+    } elsif ( $cgi->param('ship_state') =~ /^(\w*)$/ ) {
+      $ship_state = $1;
+      $cgi->param('ship_county') =~ /^([\w ]*)$/
+        or die "illegal county: ". $cgi->param('ship_county');
+      $ship_county = $1;
+      $cgi->param('ship_country') =~ /^(\w+)$/
+        or die "illegal ship_country: ". $cgi->param('ship_country');
+      $ship_country = $1;
+    #} else {
+    #  die "illegal ship_state: ". $cgi->param('ship_state');
+    }
 
     $payby = $cgi->param('payby');
     if ( $payby eq 'CHEK' || $payby eq 'DCHK' ) {




More information about the freeside-commits mailing list