#!/usr/bin/perl -w
#
-# $Id: svc_acct.export,v 1.26 2001-10-24 15:29:30 ivan Exp $
+# $Id: svc_acct.export,v 1.27 2001-12-11 10:38:56 ivan Exp $
#
# Create and export password, radius and vpopmail password files:
# passwd, passwd.adjunct, shadow, acp_passwd, acp_userinfo, acp_dialup
warn "using depriciated textradiusprepend file" if $textradiusprepend;
+
+my $radiusprepend =
+ $conf->exists('radiusprepend')
+ ? $conf->config('radiusprepend')
+ : '';
+
my @vpopmailmachines = $conf->config('vpopmailmachines')
if $conf->exists('vpopmailmachines');
my $vpopmailrestart = '';
setpriority(0,0,10);
+print USERS "$radiusprepend\n";
+
my %usernames; ## this hack helps keep the passwd files sane
my @sendmail;
<li><a href="http://search.cpan.org/search?dist=FreezeThaw">FreezeThaw</a>
<li><a href="http://search.cpan.org/search?dist=String-Approx">String-Approx</a>
<li><a href="http://search.cpan.org/search?dist=Text-Template">Text-Template</a>
+ <li><a href="http://search.cpan.org/search?dist=Archive-Tar">Archive-Tar</a>
<li><a href="http://search.cpan.org/search?dist=DBI">DBI</a>
<li><a href="http://search.cpan.org/search?mode=module&query=DBD">DBD for your database engine</a>
<li><a href="http://search.cpan.org/search?dist=DBIx-DataSource">DBIx-DataSource</a>