From 065338b4b7c3a11622c103b5a39912c640f5a7a9 Mon Sep 17 00:00:00 2001 From: shuhei-k Date: Sun, 31 May 1998 17:12:38 +0000 Subject: [PATCH] (message-followup): Would not use "Mail-Followup-To:" properly. --- lisp/message.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lisp/message.el b/lisp/message.el index 7b6f80d..aeff70e 100644 --- a/lisp/message.el +++ b/lisp/message.el @@ -3584,8 +3584,6 @@ does not read the newsgroup, so he wouldn't see any replies sent to it.")) (setq message-this-is-news nil) (cons 'To (or reply-to from ""))) (cons 'Newsgroups newsgroups))) - ((and mft message-use-mail-followup-to) - (list (cons 'To mft))) (t (if (or (equal followup-to newsgroups) (not (eq message-use-followup-to 'ask)) @@ -3607,6 +3605,8 @@ Also, some source/announcement newsgroups are not indented for discussion; responses here are directed to other newsgroups.")) (cons 'Newsgroups followup-to) (cons 'Newsgroups newsgroups)))))) + ((and mft message-use-mail-followup-to) + (list (cons 'To mft))) (posted-to `((Newsgroups . ,posted-to))) (t -- 1.7.10.4