From 7892906d056ca88b39d1976ac91d1bd7da552fb8 Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Tue, 17 Dec 2024 17:07:45 -0500 Subject: [PATCH] * lisp/mail/sendmail.el (mail-citation-prefix-regexp): Fix bug#24081 (cherry picked from commit 22806c65f4f8d68547d33997d017039763b4bf6a) --- lisp/mail/sendmail.el | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/lisp/mail/sendmail.el b/lisp/mail/sendmail.el index cf641cfb652..b0f7baa4cae 100644 --- a/lisp/mail/sendmail.el +++ b/lisp/mail/sendmail.el @@ -258,7 +258,9 @@ regardless of what part of it (if any) is included in the cited text.") ;;;###autoload (defcustom mail-citation-prefix-regexp - (purecopy "\\([ \t]*\\(\\w\\|[_.]\\)+>+\\|[ \t]*[>|]\\)+") + ;; Use [[:word:]] rather than \w so we don't get tripped up if one + ;; of those chars has a weird `syntax-table' text property. + (purecopy "\\([ \t]*\\([[:word:]]\\|[_.]\\)+>+\\|[ \t]*[>|]\\)+") "Regular expression to match a citation prefix plus whitespace. It should match whatever sort of citation prefixes you want to handle, with whitespace before and after; it should also match just whitespace. -- 2.39.5