smeserver-mini-qmail/root/etc/e-smith/templates/var/qmail/control/smtproutes/10delegateMailServer

18 lines
387 B
Plaintext
Raw Normal View History

{
$OUT = "";
use esmith::DomainsDB;
my $ddb = esmith::DomainsDB->open_ro();
for my $domain ( $ddb->domains )
{
my $mail_server = $domain->prop('MailServer')
|| $DelegateMailServer
|| 'localhost';
next if ( $mail_server eq 'localhost' );
$OUT .= $domain->key . ":$mail_server\n";
}
}