From 74f795a943560dfc03f46642536386ce36355bb4 Mon Sep 17 00:00:00 2001
From: ivan <ivan>
Date: Wed, 20 Mar 2002 07:37:05 +0000
Subject: [PATCH] disable region caching for now

---
 FS/FS/cust_main_county.pm | 8 +++++---
 1 file changed, 5 insertions(+), 3 deletions(-)

diff --git a/FS/FS/cust_main_county.pm b/FS/FS/cust_main_county.pm
index 17fe164e4..95ed53dab 100644
--- a/FS/FS/cust_main_county.pm
+++ b/FS/FS/cust_main_county.pm
@@ -119,15 +119,17 @@ sub check {
 sub regionselector {
   my ( $selected_county, $selected_state, $selected_country,
        $prefix, $onchange ) = @_;
-  $countyflag=1 if $selected_county;
 
-  unless ( @cust_main_county ) { #cache 
+  $countyflag = 0;
+
+#  unless ( @cust_main_county ) { #cache 
     @cust_main_county = qsearch('cust_main_county', {} );
     foreach my $c ( @cust_main_county ) {
       $countyflag=1 if $c->county;
       push @{$cust_main_county{$c->country}{$c->state}}, $c->county;
     }
-  }
+#  }
+  $countyflag=1 if $selected_county;
 
   my $script_html = <<END;
     <SCRIPT>
-- 
2.11.0