diff options
author | ivan <ivan> | 2001-09-04 15:06:03 +0000 |
---|---|---|
committer | ivan <ivan> | 2001-09-04 15:06:03 +0000 |
commit | f0915e1efec95afa1be6100c8d7e919fa0babc71 (patch) | |
tree | 9471a32c666b2402cfcd1053e5b32e16b43959a1 /httemplate/edit | |
parent | 1e4aa8069f25e1b4101da20bb9e0d3f60357ea52 (diff) |
oops indeed
Diffstat (limited to 'httemplate/edit')
-rwxr-xr-x | httemplate/edit/agent_type.cgi | 4 | ||||
-rwxr-xr-x | httemplate/edit/process/cust_main.cgi | 3 |
2 files changed, 4 insertions, 3 deletions
diff --git a/httemplate/edit/agent_type.cgi b/httemplate/edit/agent_type.cgi index 4f1ad8b20..ac41eec5c 100755 --- a/httemplate/edit/agent_type.cgi +++ b/httemplate/edit/agent_type.cgi @@ -1,5 +1,5 @@ <% -#<!-- $Id: agent_type.cgi,v 1.2 2001-08-21 02:31:56 ivan Exp $ --> +#<!-- $Id: agent_type.cgi,v 1.3 2001-09-04 15:06:03 ivan Exp $ --> use strict; use vars qw( $cgi $agent_type $action $hashref $p $part_pkg ); @@ -66,7 +66,7 @@ foreach $part_pkg ( qsearch('part_pkg',{}) ) { ; } -print qq!<BR><INPUT TYPE="submit" VALUE="!, +print qq!<BR><BR><INPUT TYPE="submit" VALUE="!, $hashref->{typenum} ? "Apply changes" : "Add agent type", qq!">!; 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 || ''); |