Doc fix.

diff --git a/texi/ChangeLog b/texi/ChangeLog
index fcc5120..a7c4b77 100644 (file)
--- 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 da25d5e..9eb6471 100644 (file)
--- 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