info-gnus-english
[Top][All Lists]
Advanced

[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


reply via email to

[Prev in Thread] Current Thread [Next in Thread]