[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: User agent highlighting in gnus
From: |
Reiner Steib |
Subject: |
Re: User agent highlighting in gnus |
Date: |
Mon, 20 Aug 2007 00:02:55 +0200 |
User-agent: |
Gnus/5.110007 (No Gnus v0.7) Emacs/22.1.50 (gnu/linux) |
On Sun, Aug 19 2007, Hadron wrote:
> Could you explain this block. Not being a lisp programmer I can't really
> see how to set a nice "loud" face for all User-Agent or X-Newsreader with
> "Mutt" in and another font for either with "Gnus" in and another for
> either with any other face again.
(add-to-list
'gnus-header-face-alist
(list (concat
"^"
(regexp-opt '("User-Agent" "X-Mailer" "Newsreader" "X-Newsreader") t)
":.*Mutt")
nil your-mutt-face))
(add-to-list
'gnus-header-face-alist
(list (concat
"^"
(regexp-opt '("User-Agent" "X-Mailer" "Newsreader" "X-Newsreader") t)
":.*Gnus")
nil your-gnus-face))
(add-to-list
'gnus-header-face-alist
(list (concat
"^"
(regexp-opt '("User-Agent" "X-Mailer" "Newsreader" "X-Newsreader") t)
":.*") ;; other
nil your-other-reader-face))
You need to defface your-*-face. I'm not sure if the order works in
this way. You may have to change it or add the APPEND argument of
`add-to-list'.
Bye, Reiner.
--
,,,
(o o)
---ooO-(_)-Ooo--- | PGP key available | http://rsteib.home.pages.de/
- Re: User agent highlighting in gnus, Reiner Steib, 2007/08/19
- Re: User agent highlighting in gnus, Xavier Maillard, 2007/08/19
- Re: User agent highlighting in gnus, Hadron, 2007/08/19
- Re: User agent highlighting in gnus,
Reiner Steib <=
- Re: User agent highlighting in gnus, Hadron, 2007/08/20
- Re: User agent highlighting in gnus, Steffen Schwigon, 2007/08/21
- Re: User agent highlighting in gnus, Hadron, 2007/08/21
- Re: User agent highlighting in gnus, Simias, 2007/08/21
- Re: User agent highlighting in gnus, Steffen Schwigon, 2007/08/22