Mercurial > emacs

diff lisp/mail/supercite.el @ 11768:8f49fc89adcc

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(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 771bd7ddd4cc
children 47c3aac35700
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)