fix.

diff --git a/texi/ChangeLog b/texi/ChangeLog
index a7c4b77..df8b792 100644 (file)
--- a/texi/ChangeLog
+++ b/texi/ChangeLog
@@ -1,4 +1,4 @@
-2000-05-19 15:18:32  Shenghuo ZHU  <zsh@cs.rochester.edu>
+2000-05-19 15:18:32  Dmitry Yaitskov <dimas@home.com>
 
        * message.texi (Reply): Doc fix.
 

diff --git a/texi/message.texi b/texi/message.texi
index 9eb6471..91574d9 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")
-               (cons 'To (mail-fetch-field "sender")))
+               (list (cons 'To (mail-fetch-field "sender"))))
              (t
               nil))))
 @end lisp