From 74f252e841ae742b7defe1042e8e9d3d7c513867 Mon Sep 17 00:00:00 2001
From: Ivan Kohler <ivan@freeside.biz>
Date: Tue, 2 Feb 2016 15:16:22 -0800
Subject: [PATCH] add service replacement script, RT#40031

---
 bin/svc.replace | 1 +
 1 file changed, 1 insertion(+)

diff --git a/bin/svc.replace b/bin/svc.replace
index 1d2513a33..ad9cc43a2 100644
--- a/bin/svc.replace
+++ b/bin/svc.replace
@@ -12,6 +12,7 @@ my $svcpart = shift or die &usage;
 
 foreach my $cust_svc ( qsearch('cust_svc', { 'svcpart'=>$svcpart } ) ) {
   my $svc_x = $cust_svc->svc_x;
+  $svc_x->setfixed;
   my $error = $svc_x->replace;
   warn "$error\n" if $error
 }
-- 
2.11.0