From: Richard M. Stallman <rms@gnu.org>
Date: Wed, 21 Oct 1998 18:08:17 +0000 (+0000)
Subject: (rmail-output): Insert newline only if necessary.
X-Git-Tag: emacs-20.4~1421
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=b054090e748f2d1d04d6769285dafa7b46abd375;p=emacs.git

(rmail-output): Insert newline only if necessary.
---

diff --git a/lisp/mail/rmailout.el b/lisp/mail/rmailout.el
index 7ced9999e55..a029f5e192a 100644
--- a/lisp/mail/rmailout.el
+++ b/lisp/mail/rmailout.el
@@ -295,7 +295,7 @@ The optional fourth argument FROM-GNUS is set when called from GNUS."
 	  (erase-buffer)
 	  (insert-buffer-substring rmailbuf)
 	  (rmail-delete-unwanted-fields t)
-	  (insert "\n")
+	  (or (bolp) (insert "\n"))
 	  (goto-char (point-min))
 	  (if mail-from
 	      (insert mail-from "\n")