diff options
| author | Richard M. Stallman | 1998-08-12 07:31:00 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1998-08-12 07:31:00 +0000 |
| commit | 3c2cede3cda93df7804b3721394f65d1fa57b2a6 (patch) | |
| tree | 70919aed33d5274f615a5aea095cbb5d0a2c379e | |
| parent | d6046e457f578c8494afdd0f3a7ab1282927be13 (diff) | |
| download | emacs-3c2cede3cda93df7804b3721394f65d1fa57b2a6.tar.gz emacs-3c2cede3cda93df7804b3721394f65d1fa57b2a6.zip | |
(mail-setup): After using `fill-region-as-paragraph'
on a new address field, ensure that it ends with a newline.
| -rw-r--r-- | lisp/mail/sendmail.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/mail/sendmail.el b/lisp/mail/sendmail.el index a79fa289373..2a196326db0 100644 --- a/lisp/mail/sendmail.el +++ b/lisp/mail/sendmail.el | |||
| @@ -885,7 +885,7 @@ the user from the mailer." | |||
| 885 | ;; since some systems have broken sendmails. | 885 | ;; since some systems have broken sendmails. |
| 886 | ;; unless user has said no. | 886 | ;; unless user has said no. |
| 887 | (if (memq mail-from-style '(angles parens nil)) | 887 | (if (memq mail-from-style '(angles parens nil)) |
| 888 | (list "-f" (user-login-name))) | 888 | (list "-f" user-mail-address)) |
| 889 | ;;; ;; Don't say "from root" if running under su. | 889 | ;;; ;; Don't say "from root" if running under su. |
| 890 | ;;; (and (equal (user-real-login-name) "root") | 890 | ;;; (and (equal (user-real-login-name) "root") |
| 891 | ;;; (list "-f" (user-login-name))) | 891 | ;;; (list "-f" (user-login-name))) |