Message.el questions

Message.el questions

[Lance A. Brown]

Hi,

I'm in the process of upgrading to sgnus 0.69 and re-writing my gnus
rc file to go with it.  I've come across a couple irritations in
message.el.

1.  I want to specify my real name instead of having message.el pull
    it out of the system.

2.  message-make-fqdm looks like:

    ...
     ;; We try `user-mail-address' as a backup.
     ((string-match "@\\([^\\s-]+\\)\\(\\'\\|\\W\\)" user-mail-address)
      (match-string 1 user-mail-address))
    ...

My canonical email address is labrown@dg-rtp.dg.com, resulting in
message-make-fqdm returning 'dg' as my fqdm. :-(  do we really need to
not include dashes in the matched portion of the domain name?  I've
removed it.

--[Lance]

Re: Message.el questions

[Per Abrahamsen]

>>>>> "LAB" == Lance A Brown <labrown@dg-rtp.dg.com> writes:

LAB> 1.  I want to specify my real name instead of having message.el pull
LAB>     it out of the system.

(setq user-full-name "God Emperor Lance")

LAB> 2.  message-make-fqdm looks like:

LAB>     ...
LAB>      ;; We try `user-mail-address' as a backup.
LAB>      ((string-match "@\\([^\\s-]+\\)\\(\\'\\|\\W\\)" user-mail-address)
LAB>       (match-string 1 user-mail-address))
LAB>     ...

LAB> My canonical email address is labrown@dg-rtp.dg.com, resulting in
LAB> message-make-fqdm returning 'dg' as my fqdm. :-(  do we really need to
LAB> not include dashes in the matched portion of the domain name?  I've
LAB> removed it.

This replacement code should be more reliable:

(let ((real (nth 1 (mail-extract-address-components user-mail-address))))
  (and (string-match "@\\(.*\\)\\'" real)
       (match-string 1 real)))

Re: Message.el questions

[Lars Magne Ingebrigtsen]

Per Abrahamsen <abraham@dina.kvl.dk> writes:

> This replacement code should be more reliable:
> 
> (let ((real (nth 1 (mail-extract-address-components user-mail-address))))
>   (and (string-match "@\\(.*\\)\\'" real)
>        (match-string 1 real)))

Yup.  I'll be doing something similar in 0.70.

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