(rmail-ignored-headers): Add several x400 header types.

diff --git a/lisp/mail/rmail.el b/lisp/mail/rmail.el
index 43a1acb55375393988e70a3fff6ba315fb25b53e..40ab91172640cf18f40e0e68f3b8b94c145a6c42 100644 (file)
--- a/lisp/mail/rmail.el
+++ b/lisp/mail/rmail.el
@@ -64,8 +64,8 @@ value is the user's name.)
 It is useful to set this variable in the site customization file.")
 
 ;;;###autoload
-(defvar rmail-ignored-headers "^via:\\|^mail-from:\\|^origin:\\|^status:\\|^received:\\|^message-id:\\|^summary-line:" "\
-*Gubbish headers one would rather not see.")
+(defvar rmail-ignored-headers "^via:\\|^mail-from:\\|^origin:\\|^status:\\|^received:\\|^x400-originator:\\|^x400-recipients:\\|^x400-received:\\|^x400-mts-identifier:\\|^x400-content-type:\\|^message-id:\\|^summary-line:" "\
+*Regexp to match Header fields that rmail should normally hide.")
 
 ;;;###autoload
 (defvar rmail-delete-after-output nil "\