From e1b3b7a2d93d2883817969f17d3764f2a15f69bc Mon Sep 17 00:00:00 2001 From: Alex Schroeder Date: Sun, 8 Jan 2006 23:48:56 +0000 Subject: [PATCH] (rmail-reply-regexp): Also ignore mailing list identifiers sometimes added in square brackets at the beginning of subject lines. --- lisp/ChangeLog | 6 ++++++ lisp/mail/rmail.el | 6 ++++-- 2 files changed, 10 insertions(+), 2 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 120e9990062..b0f39f42cc0 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,9 @@ +2006-01-09 Alex Schroeder + + * mail/rmail.el (rmail-reply-regexp): Also ignore mailing list + identifiers sometimes added in square brackets at the beginning of + subject lines. + 2006-01-07 Richard M. Stallman * cus-edit.el (Custom-set, Custom-save): Doc fix. 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 -- 2.39.2