Mercurial > emacs
changeset 11768:8f49fc89adcc
(sc-no-blank-line-or-header): Make mail-header-separator into a regexp.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Tue, 09 May 1995 04:05:54 +0000 |
parents | 4166c8ea623d |
children | 4b5452f8ad12 |
files | lisp/mail/supercite.el |
diffstat | 1 files changed, 2 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/mail/supercite.el Tue May 09 02:38:03 1995 +0000 +++ b/lisp/mail/supercite.el Tue May 09 04:05:54 1995 +0000 @@ -1419,7 +1419,8 @@ (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)