From: Richard M. Stallman <rms@gnu.org>
Date: Tue, 30 Jan 1996 18:25:30 +0000 (+0000)
Subject: (mail-setup): For mail-self-blind, use user-mail-address.
X-Git-Tag: emacs-19.34~1423
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=22c03d3954479e50cc0042d3d8af72c4a3ff5424;p=emacs.git

(mail-setup): For mail-self-blind, use user-mail-address.
---

diff --git a/lisp/mail/sendmail.el b/lisp/mail/sendmail.el
index 19addce426f..59d6a46ff40 100644
--- a/lisp/mail/sendmail.el
+++ b/lisp/mail/sendmail.el
@@ -274,7 +274,7 @@ actually occur.")
     (if mail-default-reply-to
 	(insert "Reply-to: " mail-default-reply-to "\n"))
     (if mail-self-blind
-	(insert "BCC: " (user-login-name) "\n"))
+	(insert "BCC: " user-mail-address "\n"))
     (if mail-archive-file-name
 	(insert "FCC: " mail-archive-file-name "\n"))
     (put-text-property (point)