changeset 14437:8013f6a7080d

(mail-setup): For mail-self-blind, use user-mail-address.
author Richard M. Stallman <rms@gnu.org>
date Tue, 30 Jan 1996 18:25:30 +0000
parents b56083146a42
children 85fcb510947a
files lisp/mail/sendmail.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/mail/sendmail.el	Mon Jan 29 23:27:09 1996 +0000
+++ b/lisp/mail/sendmail.el	Tue Jan 30 18:25:30 1996 +0000
@@ -274,7 +274,7 @@
     (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)