From 341d9fb3136e45ee4177d1c0bf0b51b5f249d178 Mon Sep 17 00:00:00 2001
From: kaoru <kaoru>
Date: Fri, 15 Dec 2000 14:46:08 +0000
Subject: [PATCH] Use `x-face-decode-message-header' instead of
 `x-face-mule-x-face-decode-message-header'.

---
 samples/en/dot.wl |    6 +-----
 samples/ja/dot.wl |    6 +-----
 2 files changed, 2 insertions(+), 10 deletions(-)

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)
 	 )))
-- 
1.7.10.4