From: Richard M. Stallman <rms@gnu.org>
Date: Sat, 8 Apr 1995 20:09:28 +0000 (+0000)
Subject: (mail-mode): Make mail-header-separator into regexp.
X-Git-Tag: emacs-19.34~4553
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=0408f0ac5a62f74e6b39286ced39706f0cea72b6;p=emacs.git

(mail-mode): Make mail-header-separator into regexp.
---

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))