-;; highlight\e$B$N@_Dj\e(B (\e$BL@$k$$GX7J?'$N>l9g$G$9\e(B)
-
-;; \e$B%0%k!<%W$rL$FI?t$K$h$j?'J,$1$7$J$$!#3+JD>uBV$K$h$j?'J,$1$9$k!#\e(B
-;(setq wl-highlight-group-folder-by-numbers nil)
-
-(setq wl-highlight-message-header-alist
- '(("Subject[ \t]*:" . wl-highlight-message-subject-header-contents)
- ("From[ \t]*:" . wl-highlight-message-from-header-contents)
- ("\\(.*To\\|Cc\\|Newsgroups\\)[ \t]*:" . wl-highlight-message-important-header-contents)
- ("\\(User-Agent\\|X-Mailer\\|X-Newsreader\\)[ \t]*:" .
- wl-highlight-message-unimportant-header-contents)
- ))
-;; \e$B0zMQ%l%Y%k$G?'J,$1$7$J$$\e(B
-;(setq wl-highlight-citation-face-list
-; '(wl-highlight-message-cited-text-1))
-
-(defun my-wl-set-face (face spec)
- (make-face face)
- (cond ((fboundp 'face-spec-set)
- (face-spec-set face spec))
- (t
- (wl-declare-face face spec))))
-
-;; \e$B%a%C%;!<%8%X%C%@\e(B
-(my-wl-set-face 'wl-highlight-message-subject-header-contents
- '((t (:foreground "blue" :bold t))))
-(my-wl-set-face 'wl-highlight-message-from-header-contents
- '((t (:foreground "red" :bold t))))
-(my-wl-set-face 'wl-highlight-message-important-header-contents
- '((t (:foreground "purple" :bold t))))
-(my-wl-set-face 'wl-highlight-message-unimportant-header-contents
- '((t (:foreground "RoyalBlue" :bold t))))
-(my-wl-set-face 'wl-highlight-message-headers
- '((t (:foreground "magenta3" :bold t))))
-(my-wl-set-face 'wl-highlight-message-header-contents
- '((t (:foreground "brown" :bold nil))))
-(my-wl-set-face 'wl-highlight-message-signature
- '((t (:foreground "blue"))))
-;; \e$B0zMQ\e(B
-(my-wl-set-face 'wl-highlight-message-citation-header
- '((t (:foreground "DarkGreen"))))
-(my-wl-set-face 'wl-highlight-message-cited-text-1
- '((t (:foreground "forest green"))))
-(my-wl-set-face 'wl-highlight-message-cited-text-2
- '((t (:foreground "SaddleBrown"))))
-(my-wl-set-face 'wl-highlight-message-cited-text-3
- '((t (:foreground "orchid3"))))
-(my-wl-set-face 'wl-highlight-message-cited-text-4
- '((t (:foreground "purple1"))))
-(my-wl-set-face 'wl-highlight-message-cited-text-5
- '((t (:foreground "MediumPurple1"))))
-(my-wl-set-face 'wl-highlight-message-cited-text-6
- '((t (:foreground "PaleVioletRed"))))
-(my-wl-set-face 'wl-highlight-message-cited-text-7
- '((t (:foreground "LightPink"))))
-(my-wl-set-face 'wl-highlight-message-cited-text-8
- '((t (:foreground "salmon"))))
-(my-wl-set-face 'wl-highlight-message-cited-text-9
- '((t (:foreground "SandyBrown"))))
-(my-wl-set-face 'wl-highlight-message-cited-text-10
- '((t (:foreground "wheat"))))
-;; \e$B%5%^%j\e(B
-(my-wl-set-face 'wl-highlight-summary-important-face
- '((t (:foreground "purple"))))
-(my-wl-set-face 'wl-highlight-summary-new-face
- '((t (:foreground "tomato"))))
-(my-wl-set-face 'wl-highlight-summary-unread-face
- '((t (:foreground "RoyalBlue"))))
-(my-wl-set-face 'wl-highlight-summary-deleted-face
- '((t (:foreground "gray"))))
-(my-wl-set-face 'wl-highlight-summary-refiled-face
- '((t (:foreground "blue"))))
-(my-wl-set-face 'wl-highlight-summary-temp-face
- '((t (:foreground "salmon"))))
-(my-wl-set-face 'wl-highlight-summary-displaying-face
- '((t (:bold t :underline t))))
-;; (\e$B%9%l%C%I\e(B)
-(my-wl-set-face 'wl-highlight-summary-thread-top-face
- '((t (:foreground "green4"))))
-(my-wl-set-face 'wl-highlight-summary-normal-face
- '((t (:foreground "SeaGreen"))))
-;; \e$B%U%)%k%@\e(B
-(my-wl-set-face 'wl-highlight-folder-unknown-face
- '((t (:foreground "RoyalBlue"))))
-(my-wl-set-face 'wl-highlight-folder-killed-face
- '((t (:foreground "gray50"))))
-(my-wl-set-face 'wl-highlight-folder-unread-face
- '((t (:foreground "brown"))))
-(my-wl-set-face 'wl-highlight-folder-zero-face
- '((t (:foreground "blue4"))))
-(my-wl-set-face 'wl-highlight-folder-few-face
- '((t (:foreground "tomato"))))
-(my-wl-set-face 'wl-highlight-folder-many-face
- '((t (:foreground "HotPink1"))))
-;; \e$B%0%k!<%W\e(B
-(my-wl-set-face 'wl-highlight-folder-opened-face
- '((t (:foreground "forest green"))))
-(my-wl-set-face 'wl-highlight-folder-closed-face
- '((t (:foreground "DarkOliveGreen4"))))
-;; \e$B%9%?!<%H%"%C%W%G%b\e(B
-(my-wl-set-face 'wl-highlight-demo-face
- '((t (:foreground "blue2"))))
-
-