X-Git-Url: https://git.jankratochvil.net/?p=PerlMail.git;a=blobdiff_plain;f=PerlMail%2FConfig.pm;h=9735762c810117bc820442165e97f34b57110522;hp=dc9f75693d7e499651575469c3ccbaef7bb5744c;hb=0c848de6fd9c35f1ec9640b3adbab036ce0a5a91;hpb=0cf7011ee6c09dfede5c8e55f5f3f795ed8abab4 diff --git a/PerlMail/Config.pm b/PerlMail/Config.pm index dc9f756..9735762 100644 --- a/PerlMail/Config.pm +++ b/PerlMail/Config.pm @@ -43,7 +43,7 @@ require Mail::Alias; BEGIN { for (qw(headerhas store headeris did dnsbl store_muttrc_alternates Received_for parts_linear mime_type - body_first mimehead razor2 header_remap)) { + body_first mimehead spamassassin header_remap)) { eval 'sub '.$_.' { return ::'.$_.'(@_); }'; } } @@ -206,7 +206,7 @@ sub audit # Do not local $store_file as it is our-imported $store_profile="silent"; local $_; - store "=spam".($_ eq 1 ? "" : ";$_") if $_=razor2(); + store "=spam".($_ eq 1 ? "" : ";$_") if $_=spamassassin(); }; $store_profile=undef(); return if did sub {