Mercurial > emacs

changeset 17486:b555959aaf3f

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(hilit-rehighlight-message): Respect mail-mode header/body separation line.
author Richard M. Stallman <rms@gnu.org>
date Wed, 16 Apr 1997 04:09:25 +0000
parents abfa77a2693b
children 1e1e04f1c87a
files lisp/hilit19.el
diffstat 1 files changed, 3 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/hilit19.el	Wed Apr 16 01:04:54 1997 +0000
+++ b/lisp/hilit19.el	Wed Apr 16 04:09:25 1997 +0000
@@ -786,7 +786,9 @@
   "Highlight a buffer containing a news article or mail message."
   (save-excursion
     (goto-char (point-min))
-    (re-search-forward "^$" nil 'noerr)
+    ;; find separation between headers and body (either a blank line or
+    ;; the message separator line in mail-mode)
+    (re-search-forward "^\\(\\|--text follows this line--\\)$" nil 'noerr)
     (hilit-unhighlight-region (point-min) (point-max) quietly)
     (hilit-highlight-region (point-min) (point) 'msg-header quietly)
     (hilit-highlight-region (point) (point-max) 'msg-body quietly)))