From 0408f0ac5a62f74e6b39286ced39706f0cea72b6 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Sat, 8 Apr 1995 20:09:28 +0000 Subject: [PATCH] (mail-mode): Make mail-header-separator into regexp. --- lisp/mail/sendmail.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lisp/mail/sendmail.el b/lisp/mail/sendmail.el index 82230e09511..d2cc11c6c40 100644 --- a/lisp/mail/sendmail.el +++ b/lisp/mail/sendmail.el @@ -296,10 +296,10 @@ C-c C-v mail-sent-via (add a sent-via field for each To or CC)." (setq font-lock-defaults '(mail-font-lock-keywords t)) (make-local-variable 'paragraph-separate) (make-local-variable 'paragraph-start) - (setq paragraph-start (concat mail-header-separator + (setq paragraph-start (concat (regexp-quote mail-header-separator) "$\\|[ \t]*[-_][-_][-_]+$\\|" paragraph-start)) - (setq paragraph-separate (concat mail-header-separator + (setq paragraph-separate (concat (regexp-quote mail-header-separator) "$\\|[ \t]*[-_][-_][-_]+$\\|" paragraph-separate)) (run-hooks 'text-mode-hook 'mail-mode-hook)) -- 2.39.5