From 07e4a20d3f4e5c9a34eae28849d22f61c265d368 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Tue, 9 May 1995 04:05:54 +0000 Subject: [PATCH] (sc-no-blank-line-or-header): Make mail-header-separator into a regexp. --- lisp/mail/supercite.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/lisp/mail/supercite.el b/lisp/mail/supercite.el index 71698549d3e..fb31e4cb4e2 100644 --- a/lisp/mail/supercite.el +++ b/lisp/mail/supercite.el @@ -1419,7 +1419,8 @@ non-nil." (if (not (bobp)) (if (and (eolp) (progn (forward-line -1) - (or (looking-at mail-header-separator) + (or (looking-at + (concat "^" (regexp-quote mail-header-separator) "$")) (and (eq major-mode 'mh-letter-mode) (mh-in-header-p))))) (progn (forward-line) -- 2.39.2