From b054090e748f2d1d04d6769285dafa7b46abd375 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Wed, 21 Oct 1998 18:08:17 +0000 Subject: [PATCH] (rmail-output): Insert newline only if necessary. --- lisp/mail/rmailout.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) 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") -- 2.39.2