From b98badc88cb1e1fcd3d292b494daa7ba4114bdb6 Mon Sep 17 00:00:00 2001
From: ivan <ivan>
Date: Fri, 13 Aug 2010 17:41:59 +0000
Subject: [PATCH] ignore expired cards on customer import

---
 FS/FS/cust_main/Import.pm | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/FS/FS/cust_main/Import.pm b/FS/FS/cust_main/Import.pm
index e2165a096..e58a0447b 100644
--- a/FS/FS/cust_main/Import.pm
+++ b/FS/FS/cust_main/Import.pm
@@ -214,6 +214,10 @@ sub batch_import {
   my $oldAutoCommit = $FS::UID::AutoCommit;
   local $FS::UID::AutoCommit = 0;
   my $dbh = dbh;
+
+  #implies ignore_expired_card
+  local($FS::cust_main::import) = 1;
+  local($FS::cust_main::import) = 1;
   
   my $line;
   my $row = 0;
-- 
2.11.0