diff options
author | ivan <ivan> | 2001-08-31 07:17:33 +0000 |
---|---|---|
committer | ivan <ivan> | 2001-08-31 07:17:33 +0000 |
commit | 237bea175ad19676bda76c3ac756a4c0b5bd899a (patch) | |
tree | 7054ad29441ff97e26ff865048a491dc6149e769 /httemplate/edit/process | |
parent | 294b8c0914f497b7714bad51dfb000d33e843995 (diff) |
fixes:
> US UT expand state
> Submit (no data entered)
> US UT is gone frome the list.
Diffstat (limited to 'httemplate/edit/process')
-rwxr-xr-x | httemplate/edit/process/cust_main_county-expand.cgi | 14 |
1 files changed, 8 insertions, 6 deletions
diff --git a/httemplate/edit/process/cust_main_county-expand.cgi b/httemplate/edit/process/cust_main_county-expand.cgi index a0231b076..5adffc62f 100755 --- a/httemplate/edit/process/cust_main_county-expand.cgi +++ b/httemplate/edit/process/cust_main_county-expand.cgi @@ -1,5 +1,5 @@ <% -# <!-- $Id: cust_main_county-expand.cgi,v 1.2 2001-08-17 11:05:31 ivan Exp $ --> +# <!-- $Id: cust_main_county-expand.cgi,v 1.3 2001-08-31 07:17:33 ivan Exp $ --> use strict; use vars qw ( $cgi $taxnum $cust_main_county @expansion $expansion ); @@ -53,11 +53,13 @@ foreach ( @expansion) { die $error if $error; } -unless ( qsearch('cust_main',{ - 'state' => $cust_main_county->getfield('state'), - 'county' => $cust_main_county->getfield('county'), - 'country' => $cust_main_county->getfield('country'), -} ) ) { +unless ( qsearch( 'cust_main', { + 'state' => $cust_main_county->state, + 'county' => $cust_main_county->county, + 'country' => $cust_main_county->country, + } ) + || ! @expansion +) { my($error)=($cust_main_county->delete); die $error if $error; } |