summaryrefslogtreecommitdiff
path: root/lisp/mail
diff options
context:
space:
mode:
authorAlex Schroeder <alex@gnu.org>2006-01-08 23:48:56 +0000
committerAlex Schroeder <alex@gnu.org>2006-01-08 23:48:56 +0000
commite1b3b7a2d93d2883817969f17d3764f2a15f69bc (patch)
tree2701fe643c4ba05952f5e25f18f4cf0df7b82093 /lisp/mail
parent447505b50802ad56b9cefc966b79db373ae2b846 (diff)
downloademacs-e1b3b7a2d93d2883817969f17d3764f2a15f69bc.tar.gz
(rmail-reply-regexp): Also ignore mailing list
identifiers sometimes added in square brackets at the beginning of subject lines.
Diffstat (limited to 'lisp/mail')
-rw-r--r--lisp/mail/rmail.el6
1 files changed, 4 insertions, 2 deletions
diff --git a/lisp/mail/rmail.el b/lisp/mail/rmail.el
index 45df1aa08be..1ab32aba45d 100644
--- a/lisp/mail/rmail.el
+++ b/lisp/mail/rmail.el
@@ -447,8 +447,10 @@ examples:
"String to prepend to Subject line when replying to a message.")
;; Some mailers use "Re(2):" or "Re^2:" or "Re: Re:" or "Re[2]:".
-;; This pattern should catch all the common variants.
-(defvar rmail-reply-regexp "\\`\\(Re\\(([0-9]+)\\|\\[[0-9]+\\]\\|\\^[0-9]+\\)?: *\\)*"
+;; This pattern should catch all the common variants. The pattern
+;; also ignores mailing list identifiers sometimes added in square
+;; brackets at the beginning of subject lines.
+(defvar rmail-reply-regexp "\\`\\(\\[.+?\\] \\)?\\(Re\\(([0-9]+)\\|\\[[0-9]+\\]\\|\\^[0-9]+\\)?: *\\)*"
"Regexp to delete from Subject line before inserting `rmail-reply-prefix'.")
(defcustom rmail-display-summary nil