From f2626fe841d40f38c96663c4553c4d3c13d55ae0 Mon Sep 17 00:00:00 2001
From: ShengHuo ZHU <zsh@cs.rochester.edu>
Date: Fri, 19 May 2000 19:21:04 +0000
Subject: [PATCH] Doc fix.

---
 texi/ChangeLog    | 4 ++++
 texi/message.texi | 2 +-
 2 files changed, 5 insertions(+), 1 deletion(-)

diff --git a/texi/ChangeLog b/texi/ChangeLog
index fcc51200b..a7c4b771c 100644
--- a/texi/ChangeLog
+++ b/texi/ChangeLog
@@ -1,3 +1,7 @@
+2000-05-19 15:18:32  Shenghuo ZHU  <zsh@cs.rochester.edu>
+
+	* message.texi (Reply): Doc fix.
+
 2000-05-17 00:50:29  Shenghuo ZHU  <zsh@cs.rochester.edu>
 
 	* gnus.texi (Listing Groups): Addition.
diff --git a/texi/message.texi b/texi/message.texi
index da25d5e47..9eb6471e2 100644
--- a/texi/message.texi
+++ b/texi/message.texi
@@ -152,7 +152,7 @@ If you want the replies to go to the @code{Sender} instead of the
 (setq message-reply-to-function
       (lambda ()
        (cond ((equal (mail-fetch-field "from") "somebody")
-               (mail-fetch-field "sender"))
+               (cons 'To (mail-fetch-field "sender")))
              (t
               nil))))
 @end lisp
-- 
2.25.1