From mboxrd@z Thu Jan 1 00:00:00 1970 X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.user/9558 Path: news.gmane.org!not-for-mail From: Reiner Steib Newsgroups: gmane.emacs.gnus.user Subject: Re: User agent highlighting in gnus Date: Mon, 20 Aug 2007 00:02:55 +0200 Organization: T-Online Message-ID: References: <1gvebbzdgh.fsf@homelinux.net> Reply-To: Reiner Steib NNTP-Posting-Host: lo.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii X-Trace: sea.gmane.org 1187563220 10348 80.91.229.12 (19 Aug 2007 22:40:20 GMT) X-Complaints-To: usenet@sea.gmane.org NNTP-Posting-Date: Sun, 19 Aug 2007 22:40:20 +0000 (UTC) To: info-gnus-english@gnu.org Original-X-From: info-gnus-english-bounces+gegu-info-gnus-english=m.gmane.org@gnu.org Mon Aug 20 00:40:17 2007 Return-path: Envelope-to: gegu-info-gnus-english@m.gmane.org Original-Received: from lists.gnu.org ([199.232.76.165]) by lo.gmane.org with esmtp (Exim 4.50) id 1IMtRQ-0005qq-Is for gegu-info-gnus-english@m.gmane.org; Mon, 20 Aug 2007 00:40:16 +0200 Original-Received: from localhost ([127.0.0.1] helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1IMtRR-0006VR-8X for gegu-info-gnus-english@m.gmane.org; Sun, 19 Aug 2007 18:40:17 -0400 Original-Path: shelby.stanford.edu!newsfeed.stanford.edu!news.tele.dk!news.tele.dk!small.news.tele.dk!newsfeed00.sul.t-online.de!newsmm00.sul.t-online.de!t-online.de!news.t-online.com!not-for-mail Original-Newsgroups: gnu.emacs.gnus Original-Lines: 40 Original-X-Trace: news.t-online.com 1187560989 00 29327 1L3W6V3J4Cu6ER7 070819 22:03:09 Original-X-Complaints-To: usenet-abuse@t-online.de X-ID: ZwE4L+ZC8e4vcsPTge8aoVGcEf5APBG+nNEHklYgNRwWD5zsap2bkn X-Face: mtjf/D:es1T0wHO:&CJ'ZXe"l; 3C--rw\z!{`eFwL){|]RpI+4{u25L=5C /0>KuGeTsk<~<&NE-AKV1560e!+RJeyWmSskkrJm?[vUV#66{T_m|Ae<||Ku#Mk5`y&O`n~z2; n8eP J5#2h@2eQgV@E70IY_0WlEx!"&giy{+\%h1LJox$zv@/l%ZmU4^tZA>xQpnkUBVC5.jpg#0'(+2?Rs )NAr:>3<=WxHE$ktbLysDIM5TbmHu*3 List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Original-Sender: info-gnus-english-bounces+gegu-info-gnus-english=m.gmane.org@gnu.org Errors-To: info-gnus-english-bounces+gegu-info-gnus-english=m.gmane.org@gnu.org Xref: news.gmane.org gmane.emacs.gnus.user:9558 Archived-At: 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/