X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=bin%2Ffs-migrate-svc_acct_sm;h=07f7b611c1ac86b58eee861a9c7a85b04b3ad43c;hp=ae2dc764d4d7226b357a76d4a64fc4b27397b2dd;hb=da86d5a8af2f915a340a74f6c97772451a1e23ef;hpb=4ac49026e732c19ef88103ab85536cea40cbc41c

diff --git a/bin/fs-migrate-svc_acct_sm b/bin/fs-migrate-svc_acct_sm
index ae2dc764d..07f7b611c 100755
--- a/bin/fs-migrate-svc_acct_sm
+++ b/bin/fs-migrate-svc_acct_sm
@@ -1,7 +1,5 @@
 #!/usr/bin/perl -Tw
 #
-# $Id: fs-migrate-svc_acct_sm,v 1.3 2001-08-21 02:43:18 ivan Exp $
-#
 # jeff@cmh.net 01-Jul-20
 
 #to delay loading dbdef until we're ready
@@ -52,8 +50,7 @@ my($dbh)=adminsuidsetup $user;
 
 $|=1;
 
-$FS::svc_acct::nossh_hack = 1;
-$FS::svc_forward::nossh_hack = 1;
+$FS::svc_Common::noexport_hack = 1;
 $FS::svc_domain::whois_hack = 1;
 
 %part_domain_svc=map { $_->svcpart, $_ } qsearch('part_svc',{'svcdb'=>'svc_domain'});