{
    my $sa = $DB->get("spamassassin") or return;

    my %old2new = ( 
		    required_hits	=> "TagLevel",
		    skip_rbl_checks	=> "SkipRBLChecks",
		    sort_spam		=> "SortSpam",
		    use_bayes		=> "UseBayes",
		);

    for my $key (keys %old2new)
    {
	next unless (exists $spamassassin{$key});

	my $value = $DB->get_prop_and_delete('spamassassin', $key);

	$DB->set_prop('spamassassin', $old2new{$key}, $value);
    }

    my $sortspam = $DB->get_prop('spamassassin', 'SortSpam');

    if ($sortspam eq "0" or $sortspam eq "1")
    {
	$DB->set_prop('spamassassin', 'SortSpam',
		($sortspam eq "1") ? "enabled" : "disabled");
    }

    my $value = $DB->get_prop_and_delete('spamassassin', 'rewrite_subject');

    if (defined $value)
    {
	$DB->set_prop('spamassassin', 'SubjectTag', 
	    ($value ? 'enabled' : 'disabled'));
    }
}
