# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 902907060 0
# Node ID c42d28898577fa6dd0a466799262ffe0bf2c8ec6
# Parent  1509bf9a54dffdb232403b7907e9c480a248dd95
(mail-setup): After using `fill-region-as-paragraph'
on a new address field, ensure that it ends with a newline.

diff -r 1509bf9a54df -r c42d28898577 lisp/mail/sendmail.el
--- a/lisp/mail/sendmail.el	Wed Aug 12 02:58:02 1998 +0000
+++ b/lisp/mail/sendmail.el	Wed Aug 12 07:31:00 1998 +0000
@@ -885,7 +885,7 @@
 			       ;; since some systems have broken sendmails.
 			       ;; unless user has said no.
 			       (if (memq mail-from-style '(angles parens nil))
-				   (list "-f" (user-login-name)))
+				   (list "-f" user-mail-address))
 ;;; 			       ;; Don't say "from root" if running under su.
 ;;; 			       (and (equal (user-real-login-name) "root")
 ;;; 				    (list "-f" (user-login-name)))