X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=bin%2Fsvc.replace;h=a9ceadab268bbfa5985208b12f7fe23bb0a51c1b;hp=1d2513a3347fef372b3a1f93f3409198d7f0e250;hb=88e9a56677d343392416c262f976f069157b06cb;hpb=725b65c280dd45a78d60e0a7fe1c445c658e2b14 diff --git a/bin/svc.replace b/bin/svc.replace index 1d2513a33..a9ceadab2 100644 --- a/bin/svc.replace +++ b/bin/svc.replace @@ -6,12 +6,13 @@ use FS::Record qw( qsearch ); use FS::cust_svc; my $user = shift or die &usage; -adminsuidsetup; +adminsuidsetup $user; 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 }