diff options
Diffstat (limited to 'lisp/mail/feedmail.el')
| -rw-r--r-- | lisp/mail/feedmail.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/mail/feedmail.el b/lisp/mail/feedmail.el index 1402db40951..53791565bb1 100644 --- a/lisp/mail/feedmail.el +++ b/lisp/mail/feedmail.el @@ -2768,7 +2768,8 @@ return that value." ((eq t feedmail-from-line) (let ((feedmail-from-line (let ((at-stuff - (if user-mail-address user-mail-address + (if (> (length user-mail-address) 0) + user-mail-address (concat (user-login-name) "@" (or mail-host-address (system-name)))))) (cond |