rh update

diff --git a/PerlMail/Config.pm b/PerlMail/Config.pm
index e4a8386..2269453 100644 (file)
--- a/PerlMail/Config.pm
+++ b/PerlMail/Config.pm
@@ -207,6 +207,7 @@ sub audit
                store "=spam"         if headeris "From",'<newsletter@jobseekerweekly.com>';
                store "=spam"         if headeris "From",'<newsletter@jobmarketweekly.com>';
                store "=spam"         if headeris "From",'<newsletter@career-digest.com>';
+               store "=spam"         if headeris "From",'<ceniky@oxyshop.czechcomputer.cz>';
                for my $header (qw(To Cc)) {
                        store "=spam" if headerhas $header,'<st@jankratochvil.net>';
                        store "=spam" if headerhas $header,'<est@jankratochvil.net>';
@@ -364,6 +365,7 @@ if (0) {
        store "=federrata","log"     if headeris "Return-Path",'<root@app5.fedora.phx.redhat.com>';
        store "=fedtools","log"      if headeris "List-Id"  ,'<fedora-tools-list.post-office.corp.redhat.com>';
        store "=freleng","log"       if headeris "List-Id"  ,'<rel-eng.lists.fedoraproject.org>';
+       store "=ftest","log"         if headeris "List-Id"  ,'<test.lists.fedoraproject.org>';
        if (headeris("List-Id"  ,'<fedora-devel-list.redhat.com>')
         || headeris("List-Id"  ,'<devel.lists.fedoraproject.org>')) {
          store "=fedd","log";
@@ -436,16 +438,20 @@ if (0) {
        store "=rhbug","log"         if headeris "X-BeenThere",'<bugzilla@redhat.com>';
        store "=rhgdb","log"         if headeris "List-Id"  ,'<tools-gdb.post-office.corp.redhat.com>';
        store "=rhit","log"          if headeris "Return-Path",'<tao@redhat.com>';
-       store "=rhcommit","log"      if headeris("List-Id"  ,'<cvs-commits-list.redhat.com>')
-                                    || headeris("X-CVS-Server",'<cvs-int.fedora.redhat.com>');
-       store "=rhcommitgdb","log"   if headeris "X-CVS-Directory",qr{^rpms/gdb(?:/.*)?$};
-       store "=rhcommitgcc","log"   if headeris "X-CVS-Directory",qr{^rpms/gcc(?:/.*)?$};
-       store "=rhcommitlibunwind","log" if headeris "X-CVS-Directory",qr{^rpms/libunwind(?:/.*)?$};
-       store "=rhcommitstrace","log" if headeris "X-CVS-Directory",qr{^rpms/strace(?:/.*)?$};
-       store "=rhcommitbinutils","log" if headeris "X-CVS-Directory",qr{^rpms/binutils(?:/.*)?$};
-       store "=rhcommitinsight","log" if headeris "X-CVS-Directory",qr{^rpms/insight(?:/.*)?$};
-       store "=rhcommitptrace","log" if headeris "X-CVS-Directory",qr{^tests/kernel/syscalls/ptrace(?:/.*)? };
-       store "=rhcommitgdbtest","log" if headeris "X-CVS-Directory",qr{^tests/gdb/gdb-any(?:/.*)? };
+       if ($Audit->subject()!~/^Broken dependencies/) {
+         store "=rhcommit","log"      if headeris("List-Id"  ,'<cvs-commits-list.redhat.com>')
+                                      || headeris("X-CVS-Server",'<cvs-int.fedora.redhat.com>');
+         store "=rhcommitgdb","log"   if headeris("X-CVS-Directory",qr{^rpms/gdb(?:/.*)?$})
+                                      || headeris("Delivered-To",'<gdb-owner@fedoraproject.org>');
+         store "=rhcommitgcc","log"   if headeris("X-CVS-Directory",qr{^rpms/gcc(?:/.*)?$})
+                                      || headeris("Delivered-To",'<gcc-owner@fedoraproject.org>');
+         store "=rhcommitlibunwind","log" if headeris "X-CVS-Directory",qr{^rpms/libunwind(?:/.*)?$};
+         store "=rhcommitstrace","log" if headeris "X-CVS-Directory",qr{^rpms/strace(?:/.*)?$};
+         store "=rhcommitbinutils","log" if headeris "X-CVS-Directory",qr{^rpms/binutils(?:/.*)?$};
+         store "=rhcommitinsight","log" if headeris "X-CVS-Directory",qr{^rpms/insight(?:/.*)?$};
+         store "=rhcommitptrace","log" if headeris "X-CVS-Directory",qr{^tests/kernel/syscalls/ptrace(?:/.*)? };
+         store "=rhcommitgdbtest","log" if headeris "X-CVS-Directory",qr{^tests/gdb/gdb-any(?:/.*)? };
+       }
        store "=rhbrnowiki","log"    if headeris("Return-Path",'<noreply@redhat.com>')
                                     && headeris("From"     ,'<noreply@redhat.com>')
                                     && headeris("To"       ,'<noreply@redhat.com>')
@@ -467,19 +473,21 @@ if (0) {
        store "=rherrata","log"      if $Audit->get("X-Erratatool-Component")
                                     || (headeris("Return-Path",'<bugzilla@redhat.com>')
                                      && headeris("Subject",qr{^Changed Errata Request }));
-       if (headeris "Subject"  ,qr{^\Q[rpmdiff] INSPECTION: Erratum \E\d{4}:\d{4} .*\btest results\b}) {
+       if (headeris "Subject"  ,qr{^\Q[rpmdiff] INSPECTION: Erratum \E\d{4}:\d{4,5} .*\btest results\b}) {
                store "=rherrata","log";
        # `[rpmdiff] INSPECTION:' came from `root@rpmdiff3.test.redhat.com'.
        } elsif ((headeris("To",'<jan.kratochvil@redhat.com>') || !$Audit->get("To") || $Audit->get("To") eq "undisclosed-recipients:;")
-                && headeris("Return-Path",qr{^\Qroot@\E.*[.](?:(?:lab|rhts|eng).(?:bos|boston)|z900|test|englab.brq|nay)\Q.redhat.com\E$})) {
+                && headeris("Return-Path",qr{^\Qroot@\E.*[.](?:(?:lab|rhts|eng)[.](?:bos|boston)|z900|test|englab[.]brq|eng.brq|nay)\Q.redhat.com\E$})) {
                store "=rhtsme","log";
        }
        store "=rhtsme","log"        if headeris "Subject"  ,qr{^\Q[Beaker Job Completion] \E};
        store "=buggcc","log"        if headeris("Return-Path",'<bugzilla-noreply@gcc.gnu.org>')
                                     || headeris("Return-Path",'<gcc-bugzilla@gcc.gnu.org>');
+       store "=bugsav","log"        if headeris "Return-Path",'<www-data@savannah.gnu.org>';
        store "=frysk","log"         if headeris "Mailing-List",'contact frysk-help@sourceware.org; run by ezmlm';
        store "=fryskcvs","log"      if headeris "List-Id"  ,'<frysk-cvs.sourceware.org>';
-       store "=bugsrc","log"        if headeris "Return-Path",'<bugzilla-noreply@sourceware.org>';
+       store "=bugsrc","log"        if headeris("Return-Path",'<bugzilla-noreply@sourceware.org>')
+                                    || headeris("Return-Path",'<sourceware-bugzilla@sourceware.org>');
        store "=rhwc","log"          if headeris "Subject"  ,'Cron <jkratoch@host0> $HOME/redhat/bin/rhwc';
        store "=dwarf","log"         if headeris "List-Id"  ,'<dwarf-discuss.lists.freestandards.org>';
        store "=dwarf","log"         if headeris "List-Id"  ,'<dwarf-discuss-dwarfstd.org>';
@@ -494,10 +502,17 @@ if (0) {
        if (headeris "Return-Path",'<buildsys@fedoraproject.org>') {
                if ($Audit->subject()=~/^\d+ builds? marked for deletion$/) {
                        store "=fkojidel","log";
+               } elsif ($Audit->subject()=~/^Broken dependencies: /) {
+                       store "=fkojidep","log";
+               } elsif ($Audit->from()=~/^S390 Koji Build System /) {
+                       store "=fkojis390","log";
                } else {
                        store "=fkoji","log";
                }
        }
+       store "=fkojidep","log"      if (headeris("From"     ,'<mschwendt@gmail.com>')
+                                        && $Audit->subject()=~/^Broken dependencies/);
+       store "=fkojiarm","log"      if headeris "From"     ,'<buildsys@arm.koji.fedoraproject.org>';
        if (headeris "Return-Path",'<buildsys@redhat.com>') {
                if ($Audit->subject()=~/^\d+ builds? marked for deletion$/) {
                        store "=rhbrewdel","log";