aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorKarl Heuer1999-04-26 19:12:44 +0000
committerKarl Heuer1999-04-26 19:12:44 +0000
commit805297bbc0263b06fd373a400b44488385d9e02c (patch)
tree590849f22966de9420c7bc242c3a1979720ecae5
parent53ca46578b937174a94accd543f33c794d9e4949 (diff)
downloademacs-805297bbc0263b06fd373a400b44488385d9e02c.tar.gz
emacs-805297bbc0263b06fd373a400b44488385d9e02c.zip
(rmail-next-same-subject): When searching, ignore
the same whitespace that was ignored in choosing the subject string.
-rw-r--r--lisp/mail/rmail.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/mail/rmail.el b/lisp/mail/rmail.el
index 03cc374d6bb..56a4eb6b568 100644
--- a/lisp/mail/rmail.el
+++ b/lisp/mail/rmail.el
@@ -2504,9 +2504,9 @@ If N is negative, go backwards instead."
2504 (setq subject (substring subject (match-end 0)))) 2504 (setq subject (substring subject (match-end 0))))
2505 (if (string-match "[ \t]+\\'" subject) 2505 (if (string-match "[ \t]+\\'" subject)
2506 (setq subject (substring subject 0 (match-beginning 0)))) 2506 (setq subject (substring subject 0 (match-beginning 0))))
2507 (setq search-regexp (concat "^Subject: *\\(Re: *\\)?" 2507 (setq search-regexp (concat "^Subject: *\\(Re:[ \t]*\\)?"
2508 (regexp-quote subject) 2508 (regexp-quote subject)
2509 "\n")) 2509 "[ \t]*\n"))
2510 (save-excursion 2510 (save-excursion
2511 (save-restriction 2511 (save-restriction
2512 (widen) 2512 (widen)