X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=bin%2Ffs-migrate-svc_acct_sm;h=07f7b611c1ac86b58eee861a9c7a85b04b3ad43c;hp=d0d4a94b69db91a908e74b34090fbe4dc642092e;hb=da86d5a8af2f915a340a74f6c97772451a1e23ef;hpb=4d513ff5a17bd3b697502b54c9516577a0a8d3e4 diff --git a/bin/fs-migrate-svc_acct_sm b/bin/fs-migrate-svc_acct_sm index d0d4a94b6..07f7b611c 100755 --- a/bin/fs-migrate-svc_acct_sm +++ b/bin/fs-migrate-svc_acct_sm @@ -1,20 +1,6 @@ #!/usr/bin/perl -Tw # -# $Id: fs-migrate-svc_acct_sm,v 1.2 2001-08-12 19:41:25 jeff Exp $ -# # jeff@cmh.net 01-Jul-20 -# -# $Log: fs-migrate-svc_acct_sm,v $ -# Revision 1.2 2001-08-12 19:41:25 jeff -# merging vpopmail support branch -# -# Revision 1.1.2.1 2001/08/08 17:45:35 jeff -# initial vpopmail support -# -# -# -# Initial vpopmail changes -# #to delay loading dbdef until we're ready #BEGIN { $FS::Record::setup_hack = 1; } @@ -64,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'});