[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Group Highlighting ?
From: |
lance |
Subject: |
Group Highlighting ? |
Date: |
Fri, 08 Jul 2005 09:15:38 -0500 |
User-agent: |
Gnus/5.1007 (Gnus v5.10.7) XEmacs/21.4 (Jumbo Shrimp, linux) |
In the INFO I came across this little snippit but it is difficult for this mere
mortal
to understand. The first line is easy enough. Correct me if I am wrong but
the second
line indicates that if the (level is < 3 and 0 unread articles). Line 3 is
Level < 3, line
4 is 0 unread articles, line 5 all others get my-group-face-5? I want to add a
line to this
that says if the group name includes "Listserv" make the color
"my-group-face-4".
How do I do this?
Lance
; HIGHLIGHTING GROUPS
(cond (window-system
(setq custom-background-mode 'light)
(defface my-group-face-1 '((t (:foreground "Red" :bold t))) "First
group face")
(defface my-group-face-2 '((t (:foreground "DarkSeaGreen4" :bold
t))) "Second group face")
(defface my-group-face-3 '((t (:foreground "Green4" :bold t)))
"Third group face")
(defface my-group-face-4 '((t (:foreground "SteelBlue" :bold t)))
"Fourth group face")
(defface my-group-face-5 '((t (:foreground "Blue" :bold t))) "Fifth
group face")))
(setq gnus-group-highlight
'(((> unread 200) . my-group-face-1)
((and (< level 3) (zerop unread)) . my-group-face-2)
((< level 3) . my-group-face-3)
((zerop unread) . my-group-face-4)
(t . my-group-face-5))
)
--
Lance Hoffmeyer
lance@augustmail.com
-------------------------------------------------------------------------------
The natural progress of things is for liberty to yield and
governments to gain ground.
-
Thomas Jefferson
- Group Highlighting ?,
lance <=