{
    my $mailfront = $DB->get("smtpfront-qmail") or return;

    my $smtpd = $DB->get("smtpd") || 
	$DB->new_record("smtpd", { type => "service" });

    $smtpd->merge_props($mailfront->props);

    $smtpd->delete_prop($_) for ( qw(Patterns PatternsFile) );

    $mailfront->delete;
}
