[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: newbie question
From: |
giglio robbo' d'acciaio |
Subject: |
Re: newbie question |
Date: |
Thu, 07 Sep 2006 13:36:52 +0200 |
User-agent: |
Mozilla/5.0 (X11; U; Linux i686; en-US; rv:1.8.0.4) Gecko/20060722 Thunderbird/1.5.0.4 Mnenhy/0.7.4.666 |
Jens Theisen ha scritto:
Hello all,
is it possible to increase score (or otherwise hightlight messages)
that are replies to own postings?
Is it possible to hightlight groups in the group buffer that contain
such?
This is what I use, and it works great:
all.SCORE
==========================================================================
(
("message-id"
("@my.domain.org>" +9000 nil s)) ;; replace <domain> properly
("references"
("@my\\.domain\\.org>$" +8000 nil r)
("@my\\.domain\\.org>.+@" +7000 nil r)
("@my\\.domain\\.org>.+@my\\.domain\\.org>$" -7000 nil r))
((&
("message-id" "@my.domain.org>" s)
("references" "@my.domain.org>" s))
-7000 nil))
==========================================================================
.gnus
(require 'gnus-sum)
(defface dz-gnus-own-posting-face nil
"Use this face to display own postings in Summary Buffer")
(copy-face 'gnus-summary-high-unread-face 'dz-gnus-own-posting-face)
(set-face-background 'dz-gnus-own-posting-face "cornflower blue")
(defface dz-gnus-direct-fup-face nil
"Use this face to display direct fups to my postings.")
(copy-face 'gnus-summary-high-unread-face 'dz-gnus-direct-fup-face)
(set-face-background 'dz-gnus-direct-fup-face "DeepSkyBlue4")
(defface dz-gnus-indirect-fup-face nil
"Use this face to display indirect fups to my postings")
(copy-face 'gnus-summary-high-unread-face 'dz-gnus-indirect-fup-face)
(set-face-background 'dz-gnus-indirect-fup-face "saddle brown")
(add-to-list 'gnus-summary-highlight
'((and (> score 8500) (eq mark gnus-unread-mark)) .
dz-gnus-own-posting-face))
(add-to-list 'gnus-summary-highlight
'((and (>= 8500 score) (>= score 7500) (eq mark gnus-unread-mark))
. dz-gnus-direct-fup-face))
(add-to-list 'gnus-summary-highlight
'((and (>= 7499 score) (>= score 6500) (eq mark gnus-unread-mark))
. dz-gnus-indirect-fup-face))
==========================================================================
Replace colours at your choice
Enjoy