Re: message-user-mail-address and other addresses

[Lars Magne Ingebrigtsen <larsi@ifi.uio.no>]

Hallvard B Furuseth <h.b.furuseth@usit.uio.no> writes:

> (message-user-mail-address) in message.el seems to think that
> user-mail-address can contain more than just the address, such as
> "name <address>".  This is wrong, and if we teach users to put "name
> <address>" in user-mail-address, packages that expect a plain address
> will fail.  Examples: sendmail.el, add-log.el, rmailsum.el.

That's true.  However, many (many) people, especially people mostly
using XEmacs, it seems, have a `user-mail-address' that contains more
than just the address.  I don't normally think one should cater to
brokenness, but in this instance there were just too many people that
experienced problems.

> But if that's the idea, (message-user-mail-address) does not work
> correctly anyway:
> 	(let ((user-mail-address "Hallvard Furuz <hbf@usit.uio.no>"))
> 	 	 (message-user-mail-address))
> 	==> "<hbf@usit.uio.no>"

Yup.  0.74 will use `mail-extract-address-components' to extract the
address parts.  I think it does a good job.  I tried it on all the
examples you gave, and it failed only on one:

>   @bsd.urgu.e-burg.su,@optoel.uucp:aleck@optoel.urgu.e-burg.su

(nth 1 (mail-extract-address-components
"@bsd.urgu.e-burg.su,@optoel.uucp:aleck@optoel.urgu.e-burg.su"))
 =>
"aleck@optoel.urgu.e-burg.su"

Perhaps one should send a bug report to the mail-extr people?

-- 
  "Yes.  The journey through the human heart 
     would have to wait until some other time."