From: kaoru <kaoru>
Date: Fri, 15 Dec 2000 14:46:08 +0000 (+0000)
Subject: Use `x-face-decode-message-header' instead of
X-Git-Tag: wl-2_4_1pre~49
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=341d9fb3136e45ee4177d1c0bf0b51b5f249d178;p=elisp%2Fwanderlust.git

Use `x-face-decode-message-header' instead of
`x-face-mule-x-face-decode-message-header'.
---

diff --git a/samples/en/dot.wl b/samples/en/dot.wl
index 1dceb11..69944ff 100644
--- a/samples/en/dot.wl
+++ b/samples/en/dot.wl
@@ -1,6 +1,5 @@
 ;;;							-*- emacs-lisp -*-
 ;;; ~/.wl (setting file for Wanderlust)
-;;;						Last-Modified: 1999-11-07
 ;;;
 
 ;; Following must be included in ~/.emacs
@@ -341,10 +340,7 @@
 	       'x-face-xmas-wl-display-x-face))
 	((module-installed-p 'x-face-mule)	;; for Mule (GNU Emacs)
 	 ;; after x-face-mule 0.20
-	 (setq wl-highlight-x-face-func
-	       (function
-		(lambda (beg end)
-		  (x-face-mule-x-face-decode-message-header beg end))))
+	 (setq wl-highlight-x-face-func 'x-face-decode-message-header)
 	 (setq x-face-mule-highlight-x-face-style 'xmas)
 	 (require 'x-face-mule)
 	 )))
diff --git a/samples/ja/dot.wl b/samples/ja/dot.wl
index e8a8d77..707def0 100644
--- a/samples/ja/dot.wl
+++ b/samples/ja/dot.wl
@@ -1,6 +1,5 @@
 ;;;							-*- emacs-lisp -*-
 ;;; ~/.wl (setting file for Wanderlust)
-;;;						Last-Modified: 1999-11-07
 ;;;
 
 ;; まず，次の設定を ~/.emacs などに書いてください。
@@ -351,10 +350,7 @@
 	       'x-face-xmas-wl-display-x-face))
 	((module-installed-p 'x-face-mule)	;; for Mule (GNU Emacs)
 	 ;; x-face-mule 0.20以後
-	 (setq wl-highlight-x-face-func
-	       (function
-		(lambda (beg end)
-		  (x-face-mule-x-face-decode-message-header beg end))))
+	 (setq wl-highlight-x-face-func 'x-face-decode-message-header)
 	 (setq x-face-mule-highlight-x-face-style 'xmas)
 	 (require 'x-face-mule)
 	 )))