From: jeff <jeff>
Date: Thu, 12 Feb 2009 19:48:24 +0000 (+0000)
Subject: proper match arguments help
X-Git-Tag: root_of_webpay_support~61
X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=commitdiff_plain;h=38c9750a1c91c591b2c6df5c5dbcfa60dd8eb682

proper match arguments help
---

diff --git a/FS/FS/cust_tax_location.pm b/FS/FS/cust_tax_location.pm
index bb61089cb..16a79db6a 100644
--- a/FS/FS/cust_tax_location.pm
+++ b/FS/FS/cust_tax_location.pm
@@ -211,7 +211,7 @@ sub batch_import {
 
   } elsif ( $format eq 'cch-zip' || $format eq 'cch-update-zip' ) {
     @fields = qw( zip city county state postalcity countyfips countydef default geocode cityflag unique );
-    push @fields, 'actionflag' if $format eq 'cch-update';
+    push @fields, 'actionflag' if $format eq 'cch-update-zip';
 
     $imported++ if $format eq 'cch-update'; #empty file ok
     
diff --git a/FS/FS/tax_rate.pm b/FS/FS/tax_rate.pm
index d468e6031..291e2d5c7 100644
--- a/FS/FS/tax_rate.pm
+++ b/FS/FS/tax_rate.pm
@@ -913,10 +913,12 @@ sub process_batch_import {
                                 UNLINK   => 0,     #meh
                               ) or die "can't open temp file: $!\n";
 
+      my $insert_pattern = ($format eq 'cch-update') ? qr/"I"\s*$/ : qr/I\s*$/;
+      my $delete_pattern = ($format eq 'cch-update') ? qr/"D"\s*$/ : qr/D\s*$/;
       while(<$fh>) {
         my $handle = '';
-        $handle = $ifh if $_ =~ /"I"\s*$/;
-        $handle = $dfh if $_ =~ /"D"\s*$/;
+        $handle = $ifh if $_ =~ /$insert_pattern/;
+        $handle = $dfh if $_ =~ /$delete_pattern/;
         unless ($handle) {
           $error = "bad input line: $_" unless $handle;
           last;