summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorivan <ivan>2001-08-31 07:17:33 +0000
committerivan <ivan>2001-08-31 07:17:33 +0000
commit237bea175ad19676bda76c3ac756a4c0b5bd899a (patch)
tree7054ad29441ff97e26ff865048a491dc6149e769
parent294b8c0914f497b7714bad51dfb000d33e843995 (diff)
fixes:
> US UT expand state > Submit (no data entered) > US UT is gone frome the list.
-rwxr-xr-xhttemplate/edit/process/cust_main_county-expand.cgi14
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;
}