From: kaoru <kaoru>
Date: Mon, 11 Feb 2008 06:25:40 +0000 (+0000)
Subject: Revert to 1.267.
X-Git-Tag: wl-2_15_6-fixes~62
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=842eead28b244dacaee1654ce4df44f3183824cb;p=elisp%2Fwanderlust.git

Revert to 1.267.
---

diff --git a/wl/wl-draft.el b/wl/wl-draft.el
index 3cd7e33..8121eb0 100644
--- a/wl/wl-draft.el
+++ b/wl/wl-draft.el
@@ -539,7 +539,7 @@ or `wl-draft-reply-with-argument-list' if WITH-ARG argument is non-nil."
 	      (wl-draft-add-references)
 	    (if wl-draft-add-in-reply-to
 		(wl-draft-add-in-reply-to)))
-      (wl-highlight-headers-for-draft)) ; highlight when added References:
+      (wl-highlight-headers 'for-draft)) ; highlight when added References:
     (when wl-highlight-body-too
       (wl-highlight-body-region beg (point-max)))))
 
@@ -1796,7 +1796,7 @@ If KILL-WHEN-DONE is non-nil, current draft buffer is killed"
     (when wl-draft-write-file-function
       (add-hook 'local-write-file-hooks wl-draft-write-file-function))
     (wl-draft-overload-functions)
-    (wl-highlight-headers-for-draft)
+    (wl-highlight-headers 'for-draft)
     (wl-draft-save)
     (clear-visited-file-modtime)))
 
@@ -2002,7 +2002,7 @@ If KILL-WHEN-DONE is non-nil, current draft buffer is killed"
       (setq wl-draft-parent-folder ""))
     (when wl-draft-write-file-function
       (add-hook 'local-write-file-hooks wl-draft-write-file-function))
-    (wl-highlight-headers-for-draft)
+    (wl-highlight-headers 'for-draft)
     (goto-char body-top)
     (run-hooks 'wl-draft-reedit-hook)
     (goto-char (point-max))
@@ -2607,7 +2607,7 @@ been implemented yet.  Partial support for SWITCH-FUNCTION now supported."
 	      t)
 	    (setq headers (cdr headers))))
 	;; highlight headers (from wl-draft in wl-draft.el)
-	(wl-highlight-headers-for-draft)
+	(wl-highlight-headers 'for-draft)
 	;; insert body
 	(if (wl-string-match-assoc "body" wl-user-agent-headers-and-body-alist
 				   'ignore-case)