From: yoichi <yoichi>
Date: Mon, 6 Dec 2004 13:21:04 +0000 (+0000)
Subject: fix the last change
X-Git-Tag: wl-2_12-root~24
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=3199aea0680556134a3034ff508e864a34cf3946;p=elisp%2Fwanderlust.git

fix the last change
---

diff --git a/wl/wl-draft.el b/wl/wl-draft.el
index 5d5e661..feccd8c 100644
--- a/wl/wl-draft.el
+++ b/wl/wl-draft.el
@@ -281,10 +281,9 @@ e.g.
     (with-temp-buffer			; to keep raw buffer unibyte.
       (set-buffer-multibyte default-enable-multibyte-characters)
       (let ((decoder (mime-find-field-decoder 'Subject 'plain)))
-	(setq subject (wl-draft-reply-make-subject
+	(setq subject (wl-draft-forward-make-subject
 		       (if (and original-subject decoder)
 			   (funcall decoder original-subject) original-subject)))))
-    (setq subject (wl-draft-forward-make-subject subject))
     (with-current-buffer (wl-message-get-original-buffer)
       (setq references (nconc
 			(std11-field-bodies '("References" "In-Reply-To"))