Re: Gnus-registry problems

[Ted Zlatanov]

On Thu, 01 Jul 2004, stm+direct_reply@bacchus.pvv.org wrote:

> Ah. I had used an empty References header, since if I just delete it,
> Gnus reinserts one when I send the message. I don't know how to make a
> message with an In-Reply-To header, but without a References header
> using Gnus.

See if this patch will work for you.  I think it should be OK, but
test it for your case :)  It will always append In-Reply-To to
References.  It seems that In-Reply-To is normally just one message
ID, so this should be OK.

Ted

Index: gnus-registry.el
===================================================================
RCS file: /usr/local/cvsroot/gnus/lisp/gnus-registry.el,v
retrieving revision 7.10
diff -r7.10 gnus-registry.el
361,362c361,366
<   (let ((refstr (or (message-fetch-field "references")
<                   (message-fetch-field "in-reply-to")))
---
>   (let* ((refstr (or (message-fetch-field "references") "")) ; guarantee 
> string
>        (reply-to (message-fetch-field "in-reply-to"))      ; grab reply-to
>        ;; now, if reply-to is valid, append it to the References
>        (refstr (if reply-to 
>                    (concat refstr " " reply-to)
>                  refstr))