diff options
Diffstat (limited to 'httemplate/edit/process')
-rwxr-xr-x | httemplate/edit/process/cust_main.cgi | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/httemplate/edit/process/cust_main.cgi b/httemplate/edit/process/cust_main.cgi index 86e6abef6..cc5efd6b1 100755 --- a/httemplate/edit/process/cust_main.cgi +++ b/httemplate/edit/process/cust_main.cgi @@ -1,5 +1,5 @@ <% -# $Id: cust_main.cgi,v 1.3 2001-08-13 23:10:34 ivan Exp $ +# $Id: cust_main.cgi,v 1.4 2001-09-04 15:06:03 ivan Exp $ use strict; use vars qw( $cgi $payby @invoicing_list $new $custnum $error ); @@ -31,6 +31,7 @@ $cgi->param('county', $3 || ''); $cgi->param('country', $4); $cgi->param('ship_state') =~ /^(\w*)( \(([\w ]+)\))? ?\/ ?(\w+)$/ + or $cgi->param('ship_state') =~ /^(((())))$/ or die "Oops, illegal \"ship_state\" param: ". $cgi->param('ship_state'); $cgi->param('ship_state', $1); $cgi->param('ship_county', $3 || ''); |