smeserver-qmail/root/etc/e-smith/templates/var/qmail/control/virtualdomains/80localdomains

20 lines
479 B
Plaintext

{
$OUT = '';
use esmith::DomainsDB;
my $domainsdb = esmith::DomainsDB->open_ro();
for my $domain ($domainsdb->domains)
{
my $mail_server = $domain->prop('MailServer')
|| $DelegateMailServer
|| 'localhost';
next if ( $mail_server ne 'localhost' );
$emaildomain = $domain->key;
my $handler = $domain->prop('EmailTo') || "alias-localdelivery";
$OUT .= "$emaildomain:$handler\n";
}
}