Re: automatically mark article expirable when first article in a thread is expirable

[Hadron]

David Bonnafous <david.bonnafous@math.ups-tlse.fr> writes:

> hi,
>
> I am not a lisp guru, so if someone resolved this problem, could you
> explain me how ?
>
> I subscribed lots of mailing list. When a new thread begin, if the
> subject of this thread don't interest me I must delete (or mark as
> expirable) all the next mails in that thread. It is annoying...
>
> Gnus is certainly able to do that for me, but how ?
>
> thanks,

I have this in my .gnus.el for just that:

(defun cg-gnus-summary-ignore-thread ()
  (interactive)
  (let* ((hdr (gnus-summary-article-header))
         (subj (aref hdr 1)))
    (gnus-summary-score-entry "Subject" subj 'S' -1000
                              (current-time-string))
    (gnus-summary-limit-to-unread)
    (gnus-summary-scroll-up 0)))

(define-key gnus-summary-mode-map (kbd "<f7>") 'cg-gnus-summary-ignore-thread)



--