From mboxrd@z Thu Jan 1 00:00:00 1970 X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.general/73194 Path: news.gmane.org!not-for-mail From: Andrew Cohen Newsgroups: gmane.emacs.gnus.general Subject: gnus-registry-split-fancy-with-parent and sender/subject Date: Sat, 16 Oct 2010 15:54:11 -0400 Message-ID: <87fww5q5gc.fsf@andy.bu.edu> NNTP-Posting-Host: lo.gmane.org Mime-Version: 1.0 Content-Type: multipart/mixed; boundary="=-=-=" X-Trace: dough.gmane.org 1287258914 3366 80.91.229.12 (16 Oct 2010 19:55:14 GMT) X-Complaints-To: usenet@dough.gmane.org NNTP-Posting-Date: Sat, 16 Oct 2010 19:55:14 +0000 (UTC) To: ding@gnus.org Original-X-From: ding-owner+M21566@lists.math.uh.edu Sat Oct 16 21:55:12 2010 Return-path: Envelope-to: ding-account@gmane.org Original-Received: from util0.math.uh.edu ([129.7.128.18]) by lo.gmane.org with esmtp (Exim 4.69) (envelope-from ) id 1P7CqW-00023n-E4 for ding-account@gmane.org; Sat, 16 Oct 2010 21:55:12 +0200 Original-Received: from localhost ([127.0.0.1] helo=lists.math.uh.edu) by util0.math.uh.edu with smtp (Exim 4.63) (envelope-from ) id 1P7Cpr-0005yD-3I; Sat, 16 Oct 2010 14:54:31 -0500 Original-Received: from mx2.math.uh.edu ([129.7.128.33]) by util0.math.uh.edu with esmtps (TLSv1:AES256-SHA:256) (Exim 4.63) (envelope-from ) id 1P7Cpp-0005xv-CS for ding@lists.math.uh.edu; Sat, 16 Oct 2010 14:54:29 -0500 Original-Received: from quimby.gnus.org ([80.91.231.51]) by mx2.math.uh.edu with esmtp (Exim 4.72) (envelope-from ) id 1P7Cpn-0005Ke-ND for ding@lists.math.uh.edu; Sat, 16 Oct 2010 14:54:28 -0500 Original-Received: from lo.gmane.org ([80.91.229.12]) by quimby.gnus.org with esmtp (Exim 3.36 #1 (Debian)) id 1P7Cpm-0002iT-00 for ; Sat, 16 Oct 2010 21:54:26 +0200 Original-Received: from list by lo.gmane.org with local (Exim 4.69) (envelope-from ) id 1P7Cpk-0001lN-Ew for ding@gnus.org; Sat, 16 Oct 2010 21:54:24 +0200 Original-Received: from andy.bu.edu ([128.197.41.152]) by main.gmane.org with esmtp (Gmexim 0.1 (Debian)) id 1AlnuQ-0007hv-00 for ; Sat, 16 Oct 2010 21:54:24 +0200 Original-Received: from cohen by andy.bu.edu with local (Gmexim 0.1 (Debian)) id 1AlnuQ-0007hv-00 for ; Sat, 16 Oct 2010 21:54:24 +0200 X-Injected-Via-Gmane: http://gmane.org/ Original-Lines: 52 Original-X-Complaints-To: usenet@dough.gmane.org X-Gmane-NNTP-Posting-Host: andy.bu.edu User-Agent: Gnus/5.110011 (No Gnus v0.11) Emacs/24.0.50 (gnu/linux) Cancel-Lock: sha1:iEmWPrgLqSyEbfe4HqxJ393sJ+8= X-Spam-Score: -1.9 (-) List-ID: Precedence: bulk Xref: news.gmane.org gmane.emacs.gnus.general:73194 Archived-At: --=-=-= Content-Type: text/plain I rely heavily on splitting mail according to the registry (the principal reason I do client side splitting) and just recently started tracking sender and subject. I notice that splitting according to references/in-reply-to obeys the ignore-groups variable, while splitting by sender and subject do not. Is there a reason for this? If not I would propose making them all behave the same way. Attached is a suggested patch. Regards, Andy --=-=-= Content-Type: text/x-diff Content-Disposition: inline; filename=registry.diff Content-Description: registry-split-fancy change diff --git a/lisp/gnus-registry.el b/lisp/gnus-registry.el index 6c2233f..79080f2 100644 --- a/lisp/gnus-registry.el +++ b/lisp/gnus-registry.el @@ -551,8 +551,9 @@ See the Info node `(gnus)Fancy Mail Splitting' for more details." key gnus-registry-max-track-groups))) (dolist (group groups) - (push group found-full) - (setq found (append (list group) (delete group found))))) + (when (and group (gnus-registry-follow-group-p group)) + (push group found-full) + (setq found (append (list group) (delete group found)))))) (push key matches) (gnus-message ;; raise level of messaging if gnus-registry-track-extra @@ -580,8 +581,9 @@ See the Info node `(gnus)Fancy Mail Splitting' for more details." key gnus-registry-max-track-groups))) (dolist (group groups) - (push group found-full) - (setq found (append (list group) (delete group found))))) + (when (and group (gnus-registry-follow-group-p group)) + (push group found-full) + (setq found (append (list group) (delete group found)))))) (push key matches) (gnus-message ;; raise level of messaging if gnus-registry-track-extra --=-=-=--