From: Richard M. Stallman <rms@gnu.org>
Date: Tue, 19 May 1998 00:42:55 +0000 (+0000)
Subject: (rmail-toggle-header): Ensure blank line between headers and body.
X-Git-Tag: emacs-20.3~942
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=2be0e541138fa0d8eb5b4617691e81a37cfc3227;p=emacs.git

(rmail-toggle-header): Ensure blank line between headers and body.
---

diff --git a/lisp/mail/rmail.el b/lisp/mail/rmail.el
index a6665435a95..e883ad2e6a9 100644
--- a/lisp/mail/rmail.el
+++ b/lisp/mail/rmail.el
@@ -1766,6 +1766,9 @@ Otherwise, delete all header fields whose names match `rmail-ignored-headers'."
   (save-restriction
     (save-excursion
   (narrow-to-region (rmail-msgbeg rmail-current-message) (point-max))
+                 (if (not (or (= ?\n (char-after (point)))
+                              (= ?\n (char-before (1- (point))))))
+                     (insert "\n"))
     (goto-char (point-min))
     (forward-line 1)
       (= (following-char) ?1))))