diff lisp/mail/rmail.el @ 69907:e711374bee77

(rmail-mime-charset-pattern): Ignore format and delsp specs while looking for charset.
author Richard M. Stallman <rms@gnu.org>
date Mon, 10 Apr 2006 03:19:03 +0000
parents c0ad26dd3693
children ac1dd9b38f12 c156f6a9e7b5
line wrap: on
line diff
--- a/lisp/mail/rmail.el	Mon Apr 10 03:06:55 2006 +0000
+++ b/lisp/mail/rmail.el	Mon Apr 10 03:19:03 2006 +0000
@@ -623,7 +623,9 @@
 
 ;;;###autoload
 (defvar rmail-mime-charset-pattern
-  "^content-type:[ ]*text/plain;[ \t\n]*charset=\"?\\([^ \t\n\";]+\\)\"?"
+  (concat "^content-type:[ ]*text/plain;"
+	  "\\(?:[ \t\n]*\\(format\\|delsp\\)=\"?[-a-z0-9]+\"?;\\)*"
+	  "[ \t\n]*charset=\"?\\([^ \t\n\";]+\\)\"?")
   "Regexp to match MIME-charset specification in a header of message.
 The first parenthesized expression should match the MIME-charset name.")