Remove any LMTP.

diff --git a/PerlMail/Config.pm b/PerlMail/Config.pm
index 7d8deff..52bc3f8 100644 (file)
--- a/PerlMail/Config.pm
+++ b/PerlMail/Config.pm
@@ -45,7 +45,7 @@ use Carp qw(confess cluck);
 
 BEGIN {
        for (qw(headerhas writeto store headeris did dnsbl store_muttrc_alternates Received_for parts_linear mime_type
-                       body_first body_simple is_multipart mimehead mimebody spamassassin clamscan header_remap lmtp_deliver)) {
+                       body_first body_simple is_multipart mimehead mimebody spamassassin clamscan header_remap)) {
                eval 'sub '.$_.' { return ::'.$_.'(@_); }';
                }
        }
@@ -71,17 +71,6 @@ our $MaxBodySMS=0x1000;
 our @SMSwebRcpt=qw(420 602 431329);
 # Some WWW::SMS modules require username:
 our $SMSwebRcpt_username="lace2";
-our $lmtp_admin="cyrus";
-our $lmtp_pwd;
-{
-       local *F;
-       open F,"$HOME/priv/lmtp.${lmtp_admin}.pwd" or die;
-       $lmtp_pwd=<F>;
-       chomp $lmtp_pwd;
-       close F or die;
-       }
-our $lmtp_user_from="lace";
-our $lmtp_user_to="lacemail";
 our $clamscan_waitpid_timeout=3;
 
 
@@ -632,10 +621,6 @@ if (0) {
                # return if $mailed;
        }
 
-       if (($isFROM_MAILER && !did) || !did) {
-#              lmtp_deliver $lmtp_admin,$lmtp_pwd,$lmtp_user_from,$lmtp_user_to;
-               }
-
        store "=errm","bell"         if $isFROM_MAILER && !did()
                                     # qr/daemon@/ makes $isFROM_MAILER positive.
                                     && !headeris("From",'<bugzilla-daemon@bugzilla.gnome.org>');