Bug#2476: emacs mucks up my email address

[richard@uk.geeks.org (Richard Kettlewell)]

Raul Miller writes:
>Here's what I think should be fixed.  Currently, ../lisp/startup.el
>has the text:
>
>  ;; Do this here in case the init file sets mail-host-address.
>  (or user-mail-address
>      (setq user-mail-address (concat (user-login-name) "@"
>				      (or mail-host-address
>					  (system-name)))))
>
>This should be
>
>  ;; Do this here in case the init file sets mail-host-address.
>  (or user-mail-address
>      (setq user-mail-address
>	    (if mail-host-address
>		(concat (user-login-name) "@" mail-host-address)
>	      (user-login-name))))
>
>This lets the system default mail host address be used if emacs
>doesn't have a non-default value.

Apropos this, I'd like to point out that this bit of sendmail.el is
quite stupid, as it assumes that Emacs has more information about your
mail configuration than the MTA, which is not necessarily the case.
The behaviour should at least be configurable, and the default should
be to not use -f.

Oh, and /usr/lib/sendmail should say /usr/sbin/sendmail on Debian
systems, though that's purely an aesthetic thing l-)

(I'm talking about 19.28 here.)

	  (apply 'call-process-region
		 (append (list (point-min) (point-max)
			       (if (boundp 'sendmail-program)
				   sendmail-program
				 "/usr/lib/sendmail")
			       nil errbuf nil "-oi")
			 ;; Always specify who from,
			 ;; since some systems have broken sendmails.
			 (list "-f" (user-login-name))
;                        ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
;                        NOOOOOOOOOOOOOOOOO!

[...]

--
Richard Kettlewell
http://www.elmail.co.uk/staff/richard/                    richard@uk.geeks.org
             Well, sure, the government lies, and the newspapers lie, but in a
                                        democracy they aren't the same lies...