20 lines
444 B
Plaintext
20 lines
444 B
Plaintext
{
|
|
my $smtpd = $DB->get("smtpd");
|
|
if ($smtpd){
|
|
my $qpsmtpd = $DB->get("qpsmtpd") ||
|
|
$DB->new_record("qpsmtpd", { type => "service" });
|
|
|
|
$qpsmtpd->merge_props($smtpd->props);
|
|
$smtpd->delete;
|
|
}
|
|
|
|
my $ssmtpd = $DB->get("ssmtpd");
|
|
if ($ssmtpd){
|
|
my $sqpsmtpd = $DB->get("sqpsmtpd") ||
|
|
$DB->new_record("sqpsmtpd", { type => "service" });
|
|
|
|
$sqpsmtpd->merge_props($ssmtpd->props);
|
|
$ssmtpd->delete;
|
|
}
|
|
}
|