From 3f11a5e5c2026eb23eeed1eab780c95279062576 Mon Sep 17 00:00:00 2001 From: Ivan Kohler Date: Fri, 12 Feb 2016 10:54:26 -0800 Subject: [PATCH] payby upgrade first so other cust_main->replace operations don't error out, RT#32043 --- FS/FS/cust_main.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/FS/FS/cust_main.pm b/FS/FS/cust_main.pm index f0a152bc0..d6c7754e6 100644 --- a/FS/FS/cust_main.pm +++ b/FS/FS/cust_main.pm @@ -5502,7 +5502,8 @@ sub _upgrade_data { #class method local(@encrypted_fields) = (); local($FS::cust_payby::ignore_expired_card) = 1; - local($FS::cust_payby::ignore_banned_card) = 1; + local($FS::cust_payby::ignore_banned_card) = 1; + local($FS::cust_payby::ignore_cardtype) = 1; my @payfields = qw( payby payinfo paycvv paymask paydate paystart_month paystart_year payissue @@ -5524,7 +5525,6 @@ sub _upgrade_data { #class method map { $_ => $cust_main->$_(); } @payfields }; - local($FS::cust_payby::ignore_cardtype) = 1; my $error = $cust_payby->insert; die $error if $error; -- 2.20.1