doc: return fields for customer_info, RT#84796

[freeside.git] / bin / svc.replace

diff --git a/bin/svc.replace b/bin/svc.replace
old mode 100644 (file)
new mode 100755 (executable)
index ad9cc43..a9ceada
--- a/bin/svc.replace
+++ b/bin/svc.replace
@@ -6,7 +6,7 @@ use FS::Record qw( qsearch );
 use FS::cust_svc;
 
 my $user = shift or die &usage;
-adminsuidsetup;
+adminsuidsetup $user;
 
 my $svcpart = shift or die &usage;