diff options
| author | Gerd Moellmann <gerd@gnu.org> | 2001-01-29 12:08:17 +0000 |
|---|---|---|
| committer | Gerd Moellmann <gerd@gnu.org> | 2001-01-29 12:08:17 +0000 |
| commit | 0404d0310081ac88f781b57274375f37d8969a8c (patch) | |
| tree | c1a1826956ce134bcf47e1904514d1fa7a309872 | |
| parent | e7c721228397bdf3f76cda0edda643a9d930da10 (diff) | |
| download | emacs-0404d0310081ac88f781b57274375f37d8969a8c.tar.gz | |
(rmail-ignored-headers): Add X-Sign, X-BeenThere,
X-Mailman-Version, Precedence, List-Help, List-Post,
List-Subscribe, List-Id, List-Unsubscribe, List-Archive,
Content-Type, Content-Length.
| -rw-r--r-- | lisp/ChangeLog | 7 | ||||
| -rw-r--r-- | lisp/mail/rmail.el | 17 |
2 files changed, 22 insertions, 2 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 3e4f1ae7e33..1b1087d4a51 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,10 @@ +2001-01-29 Gerd Moellmann <gerd@gnu.org> + + * mail/rmail.el (rmail-ignored-headers): Add X-Sign, X-BeenThere, + X-Mailman-Version, Precedence, List-Help, List-Post, + List-Subscribe, List-Id, List-Unsubscribe, List-Archive, + Content-Type, Content-Length. + 2001-01-28 Eli Zaretskii <eliz@is.elta.co.il> * isearch.el (isearch-highlight): Don't punt if the display diff --git a/lisp/mail/rmail.el b/lisp/mail/rmail.el index 74e1f41abd0..afbea71a9b3 100644 --- a/lisp/mail/rmail.el +++ b/lisp/mail/rmail.el @@ -1,6 +1,6 @@ ;;; rmail.el --- main code of "RMAIL" mail reader for Emacs. -;; Copyright (C) 1985,86,87,88,93,94,95,96,97,98,2000 +;; Copyright (C) 1985,86,87,88,93,94,95,96,97,98,2000, 2001 ;; Free Software Foundation, Inc. ;; Maintainer: FSF @@ -139,7 +139,20 @@ value is the user's name.) It is useful to set this variable in the site customization file.") ;;;###autoload -(defcustom rmail-ignored-headers "^via:\\|^mail-from:\\|^origin:\\|^references:\\|^status:\\|^received:\\|^x400-originator:\\|^x400-recipients:\\|^x400-received:\\|^x400-mts-identifier:\\|^x400-content-type:\\|^\\(resent-\\|\\)message-id:\\|^summary-line:\\|^resent-date:\\|^nntp-posting-host:\\|^path:\\|^x-char.*:\\|^x-face:\\|^x-mailer:\\|^delivered-to:\\|^lines:\\|^mime-version:\\|^content-transfer-encoding:\\|^x-coding-system:\\|^return-path:\\|^errors-to:\\|^return-receipt-to:\\|^x-attribution:\\|^x-disclaimer:" +(defcustom rmail-ignored-headers + (concat "^via:\\|^mail-from:\\|^origin:\\|^references:" + "\\|^status:\\|^received:\\|^x400-originator:\\|^x400-recipients:" + "\\|^x400-received:\\|^x400-mts-identifier:\\|^x400-content-type:" + "\\|^\\(resent-\\|\\)message-id:\\|^summary-line:\\|^resent-date:" + "\\|^nntp-posting-host:\\|^path:\\|^x-char.*:\\|^x-face:" + "\\|^x-mailer:\\|^delivered-to:\\|^lines:\\|^mime-version:" + "\\|^content-transfer-encoding:\\|^x-coding-system:" + "\\|^return-path:\\|^errors-to:\\|^return-receipt-to:" + "\\|^x-sign:\\|^x-beenthere:\\|^x-mailman-version:" + "\\|^precedence:\\|^list-help:\\|^list-post:\\|^list-subscribe:" + "\\|^list-id:\\|^list-unsubscribe:\\|^list-archive:" + "\\|^content-type:\\|^content-length:" + "\\|^x-attribution:\\|^x-disclaimer:") "*Regexp to match header fields that Rmail should normally hide. This variable is used for reformatting the message header, which normally happens once for each message, |