[freeside-commits] freeside/FS/FS cust_main.pm,1.565,1.566

[Ivan,,,]

Update of /home/cvs/cvsroot/freeside/FS/FS
In directory wavetail.420.am:/tmp/cvs-serv24617

Modified Files:
	cust_main.pm 
Log Message:
if there's a geocode override and the address changes, clear it, RT#10376

Index: cust_main.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/FS/cust_main.pm,v
retrieving revision 1.565
retrieving revision 1.566
diff -u -w -d -r1.565 -r1.566
--- cust_main.pm	20 Oct 2010 02:07:00 -0000	1.565
+++ cust_main.pm	31 Oct 2010 21:23:36 -0000	1.566
@@ -1403,6 +1403,17 @@
     return "You are not permitted to create complimentary accounts.";
   }
 
+  if ( $old->get('geocode') && $old->get('geocode') eq $self->get('geocode')
+       && $conf->exists('enable_taxproducts')
+     )
+  {
+    my $pre = ($conf->exists('tax-ship_address') && $self->ship_zip)
+                ? 'ship_' : '';
+    $self->set('geocode', '')
+      if $old->get($pre.'zip') ne $self->get($pre.'zip')
+      && length($self->get($pre.'zip')) >= 10;
+  }
+
   local($ignore_expired_card) = 1
     if $old->payby  =~ /^(CARD|DCRD)$/
     && $self->payby =~ /^(CARD|DCRD)$/