changeset 79439:b5d24ce5f8b7

(rmail-current-subject-regexp): Allow more than one space after "Subject:".
author Eli Zaretskii <eliz@gnu.org>
date Fri, 16 Nov 2007 16:05:07 +0000
parents 2ccc14139a0b
children 018815e0a239
files lisp/mail/rmail.el
diffstat 1 files changed, 3 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/mail/rmail.el	Fri Nov 16 11:03:32 2007 +0000
+++ b/lisp/mail/rmail.el	Fri Nov 16 16:05:07 2007 +0000
@@ -3281,7 +3281,9 @@
     (setq subject (regexp-quote subject))
     (setq subject
 	  (replace-regexp-in-string "[ \t\n]+" "[ \t\n]+" subject t t))
-    (concat "^Subject: "
+    ;; Some mailers insert extra spaces after "Subject:", so allow any
+    ;; amount of them.
+    (concat "^Subject:[ \t]+"
 	    (if (string= "\\`" (substring rmail-reply-regexp 0 2))
 		(substring rmail-reply-regexp 2)
 	      rmail-reply-regexp)