diff options
Diffstat (limited to 'bin')
| -rwxr-xr-x | bin/svc_acct_sm.export | 13 |
1 files changed, 7 insertions, 6 deletions
diff --git a/bin/svc_acct_sm.export b/bin/svc_acct_sm.export index ce4900733..380a52eff 100755 --- a/bin/svc_acct_sm.export +++ b/bin/svc_acct_sm.export @@ -1,6 +1,6 @@ #!/usr/bin/perl -Tw # -# $Id: svc_acct_sm.export,v 1.2 1998-12-10 07:23:17 ivan Exp $ +# $Id: svc_acct_sm.export,v 1.3 2000-06-12 08:37:56 ivan Exp $ # # Create and export config files for sendmail, qmail # @@ -42,7 +42,10 @@ # /var/spool/freeside/conf and sendmail updates ivan@sisd.com 98-aug-14 # # $Log: svc_acct_sm.export,v $ -# Revision 1.2 1998-12-10 07:23:17 ivan +# Revision 1.3 2000-06-12 08:37:56 ivan +# sendmail fix from Jeff Finucane +# +# Revision 1.2 1998/12/10 07:23:17 ivan # use FS::Conf, need user (for datasrc) # @@ -90,8 +93,6 @@ unless ( flock(EXPORT,LOCK_EX|LOCK_NB) ) { seek(EXPORT,0,0); print EXPORT $$,"\n"; -my(@svc_acct_sm)=qsearch('svc_acct_sm',{}); - ( open(RCPTHOSTS,">$spooldir/rcpthosts") and flock(RCPTHOSTS,LOCK_EX|LOCK_NB) ) or die "Can't open $spooldir/rcpthosts: $!"; @@ -153,10 +154,10 @@ foreach $svc_acct_sm ( qsearch('svc_acct_sm') ) { print RECIPIENTMAP "$domuser\@$domain:$username\@$mydomain\n"; } - print VIRTUSERTABLE @sendmail; - } +print VIRTUSERTABLE @sendmail; + chmod 0644, "$spooldir/sendmail.cw", "$spooldir/virtusertable", "$spooldir/rcpthosts", |