From mboxrd@z Thu Jan  1 00:00:00 1970
X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.general/31090
Path: main.gmane.org!not-for-mail
From: Dmitry Yaitskov <dimas@home.com>
Newsgroups: gmane.emacs.gnus.general
Subject: message-reply-to-function bug?
Date: 19 May 2000 11:11:56 -0400
Organization: Just me at home
Sender: owner-ding@hpc.uh.edu
Message-ID: <87g0reo9qb.fsf@lucy.mtth1.on.wave.home.com>
NNTP-Posting-Host: coloc-standby.netfonds.no
Mime-Version: 1.0
Content-Type: text/plain; charset=us-ascii
X-Trace: main.gmane.org 1035167538 12065 80.91.224.250 (21 Oct 2002 02:32:18 GMT)
X-Complaints-To: usenet@main.gmane.org
NNTP-Posting-Date: Mon, 21 Oct 2002 02:32:18 +0000 (UTC)
Return-Path: <owner-ding@hpc.uh.edu>
Original-Received: from lisa.math.uh.edu (lisa.math.uh.edu [129.7.128.49])
	by mailhost.sclp.com (Postfix) with ESMTP id 21592D051E
	for <jason@mailhost.sclp.com>; Fri, 19 May 2000 11:12:25 -0400 (EDT)
Original-Received: from sina.hpc.uh.edu (lists@Sina.HPC.UH.EDU [129.7.3.5])
	by lisa.math.uh.edu (8.9.1/8.9.1) with ESMTP id KAB17498;
	Fri, 19 May 2000 10:12:24 -0500 (CDT)
Original-Received: by sina.hpc.uh.edu (TLB v0.09a (1.20 tibbs 1996/10/09 22:03:07)); Fri, 19 May 2000 10:11:47 -0500 (CDT)
Original-Received: from mailhost.sclp.com (postfix@sclp3.sclp.com [204.252.123.139])
	by sina.hpc.uh.edu (8.9.3/8.9.3) with ESMTP id KAA04692
	for <ding@hpc.uh.edu>; Fri, 19 May 2000 10:11:37 -0500 (CDT)
Original-Received: from mail.rdc2.on.home.com (ha1.rdc2.on.home.com [24.9.0.15])
	by mailhost.sclp.com (Postfix) with ESMTP id 25A92D051E
	for <ding@gnus.org>; Fri, 19 May 2000 11:11:58 -0400 (EDT)
Original-Received: from lucy.mtth1.on.wave.home.com ([24.65.46.137])
          by mail.rdc2.on.home.com (InterMail vM.4.01.02.17 201-229-119)
          with SMTP
          id <20000519151157.ULBP20554.mail.rdc2.on.home.com@lucy.mtth1.on.wave.home.com>
          for <ding@gnus.org>; Fri, 19 May 2000 08:11:57 -0700
Original-To: Ding <ding@gnus.org>
User-Agent: Gnus/5.0807 (Gnus v5.8.7) XEmacs/21.2 (Melpomene)
Original-Lines: 38
Precedence: list
X-Majordomo: 1.94.jlt7
Xref: main.gmane.org gmane.emacs.gnus.general:31090
X-Report-Spam: http://spam.gmane.org/gmane.emacs.gnus.general:31090

Hi,

Info for message-reply-to-function says that it can return either a
string which will be used as the To header, or a list of header-value
pairs.

I tried to use From instead of Reply-to for certain addresses, like
this:

(setq message-reply-to-function
      (lambda ()
	(cond ((equal (mail-fetch-field "reply-to") "qq@aa.com")
                    (mail-fetch-field "from"))
	      (t
	       nil))))

In gnus 5.8.7, this generates an error:

Signaling: (wrong-type-argument listp ?D)
  message-setup(((Subject . "Re: printing") ?J ?o ?h ?n ?\  ?D ?o ?e ?\  ?< ?d ?o ?e ?@ ?a ?a ?\. ?c ?o ?m ?> (References . "<39254725.4CB646D3@aa.com>")) #<buffer " *gnus article copy*">)
  message-reply(nil nil)
  gnus-summary-reply((2498) nil)
  gnus-summary-reply-with-original(nil)
  call-interactively(gnus-summary-reply-with-original)

Which looks like a bug, at least in the docs. The following version
works though:

(setq message-reply-to-function
      (lambda ()
	(cond ((equal (mail-fetch-field "reply-to") "qq@aa.com")
	       (list (cons 'To (mail-fetch-field "from"))))
	      (t
	       nil))))

-- 
Cheers,
-Dima.