changed newsletter-transport.pl: configuration for this server

This commit is contained in:
Arjan Widlak 2010-06-07 11:40:30 +02:00
parent 36a51a17a3
commit 79c2f93d07

View file

@ -16,11 +16,10 @@ use List::MoreUtils qw{ any };
my $NO_SUCH_USER = 67;
my $webguiRoot = '/data/WebGUI';
my %configs = (
'martintwee.oqapi.nl' => 'martintwee.oqapi.nl.conf',
'lom.lom.st.unitedknowledge.org' => 'www.lomcongres.nl.conf',
);
#---------------------------------------------------------------
my ( $domain, $user ) = @ARGV;
my ( $mailId, $command ) = $user =~ m{^(.+)-([^-]+)$}i;