From 042bbdda72e889f699b62370d5c3a1da591ae550 Mon Sep 17 00:00:00 2001 From: yamaoka Date: Tue, 7 Jan 2003 05:33:01 +0000 Subject: [PATCH] * message.el (message-setup-1): Don't call `message-use-alternative-email-as-from' if it isn't for replying. --- ChangeLog | 5 +++++ lisp/message.el | 3 ++- 2 files changed, 7 insertions(+), 1 deletion(-) diff --git a/ChangeLog b/ChangeLog index 1481444..aed8a3e 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,8 @@ +2003-01-07 Keiichi Suzuki + + * lisp/message.el (message-setup-1): Don't call + `message-use-alternative-email-as-from' if it isn't for replying. + 2003-01-05 Katsumi Yamaoka * etc/gnus/gnus.xpm (oort): Make the color replaceable. diff --git a/lisp/message.el b/lisp/message.el index 01d457c..d218409 100644 --- a/lisp/message.el +++ b/lisp/message.el @@ -5718,7 +5718,8 @@ are not included." (message-insert-signature) (save-restriction (message-narrow-to-headers) - (if message-alternative-emails + (if (and replybuffer + message-alternative-emails) (message-use-alternative-email-as-from)) (run-hooks 'message-header-setup-hook)) (set-buffer-modified-p nil) -- 1.7.10.4