X-Git-Url: https://git.jankratochvil.net/?p=PerlMail.git;a=blobdiff_plain;f=My-Audit.pm;h=685b382490a5e6f373d0f1c71d7cf0ad6907de3c;hp=9bc0fbc24fd9fadb611d13a07ddada6aa74b8625;hb=cf27e591624c122b61fc4c9e6b37bc7a73ccb376;hpb=b617e5b149b1c8b7df3068be2cd17322872ca9a7 diff --git a/My-Audit.pm b/My-Audit.pm index 9bc0fbc..685b382 100644 --- a/My-Audit.pm +++ b/My-Audit.pm @@ -7,8 +7,8 @@ sub audit_init "silent"=>["=btw" ,"did"], "log" =>["=silent","syslog"], "bell" =>["=log" ,"bell"], - "sms" =>["=bell" ,"sms=1"], - "crit" =>["=sms" ,"sms=3"], + "sms" =>["=bell" ], #,"sms=1"], + "crit" =>["=sms" ], #,"sms=3"], ); @sms_squeezes=( { "SqueezeControl"=>"noconv" }, @@ -163,8 +163,9 @@ sub audit store "=libtoolpat","log" if headeris "List-Id" ,''; # own webs store "=energie","bell" if headeris "From" ,qr/^EnergieWeb/; - store "=ats","bell" if headeris "From" ,''; - store "=atscasablanca","sms" if headeris "From" ,''; + store "=ats","log" if headeris("From" ,'') + || (headeris("From",'') && headerhas("To",'')); + store "=atscasablanca","log" if headeris "From" ,''; # Petr Koutecky does not mark his Stuff store "=koutecky","log" if headeris "From" ,'';