Re: new Mail-Followup-To patch...please take a look...

["Matt Armstrong" <matt+dated+1006984700.195575@lickey.com>]

Josh Huber <huber@alum.wpi.edu> writes:

> Here's my current version.
>
> <snip>
> +
> +(defun message-make-mft ()
> +  "Return the Mail-Followup-To header."
> +  (let* ((msg-recipients (message-options-get 'message-recipients))
> +	 (recipients
> +	  (mapcar 'mail-strip-quoted-names
> +		  (message-tokenize-header msg-recipients)))
> <snip>

Hey Josh, I've applied this patch -- really cool.  Assuming this
message gets a correct MFT header, I can say it works for me.

Anyway, I was reading http://cr.yp.to/proto/replyto.html and in
particular, this portion:

    You may want to warn the user when he views a message where he's
    not included in Mail-Followup-To. This usually indicates that the
    user has subscribed to a mailing list shown in Mail-Followup-To,
    but hasn't told you about that mailing list. Or it may indicate
    that someone is redirecting the discussion.

To implement this, we'd need a function that takes a list of
recipients and returns the list of addresses in the default MFT.
message-make-mft is almost there.  How about a message-calculate-mft
function that takes a list of addresses and returns another list.
Then message-make-mft simply calls it with the result of
(message-options-get 'message-recipients).


-- 
matt