Update home workstation DNS names.

[PerlMail.git] / PerlMail / Config.pm

diff --git a/PerlMail/Config.pm b/PerlMail/Config.pm
index 8be89b1..435a3f4 100644 (file)
--- a/PerlMail/Config.pm
+++ b/PerlMail/Config.pm
@@ -89,7 +89,7 @@ our $clamscan_waitpid_timeout=3;
 # Global system lock for exclusive $DB_table access:
 our $Lock_pathname="/tmp/PerlMail.lock";
 # 'workstation' hostname and port. Hostname may be dyndns:
-our $PeerAddr="exuhome.dyn.jankratochvil.net.:852";
+our $PeerAddr="kashome.dyn.jankratochvil.net.:852";
 #our $PeerAddr="127.0.0.1:2852";
 # 15sec is NOT enough as the remote peer must complete mail store:
 our $Socket_timeout=7600;
@@ -217,7 +217,7 @@ our @h_from=(
 # 'bell'   =>Bell sound.
 # 'sms=\d+'=>Send SMS by WWW::SMS with specified maximum # of parts
 our %audit_profile=(
-               "btw"   =>[],
+               "btw"   =>["syslog"],
                "silent"=>["=btw"   ,"did"],
                "log"   =>["=silent","syslog"],
                "bell"  =>["=log"   ,"bell"],
@@ -482,7 +482,7 @@ sub audit
        store "=mailmand","silent"   if headeris "List-Id"  ,'<mailman-developers.python.org>';
        store "=asterisk-perl","log" if headeris "List-Post",'<asterisk-perl@lists.gnuinter.net>';
        store "=i4l","silent"        if headeris "List-Id"  ,'<isdn4linux.listserv.isdn4linux.de>';
-       store "=glibc","silent"      if headeris "Mailing-List",qr/\b\Qlibc-alpha-help\E@\Qsources.redhat.com\E\b/;
+       store "=glibc","silent"      if headeris "List-Post",'<libc-alpha@sourceware.org>';
        store "=fedann","bell"       if headeris "List-Id"  ,'<fedora-announce-list.redhat.com>';
        store "=fedtools","log"      if headeris "List-Id"  ,'<fedora-tools-list.redhat.com>';
        store "=bashbug","log"       if headeris "List-Id"  ,'<bug-bash.gnu.org>';
@@ -522,7 +522,7 @@ sub audit
 
        if (!did) {
                store "==","sms";
-               spamassassin "$HOME/bin/sa-learn --ham";
+               spamassassin "sa-learn --ham";
                }
 }