From mboxrd@z Thu Jan 1 00:00:00 1970 X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.general/44742 Path: main.gmane.org!not-for-mail From: Josh Huber Newsgroups: gmane.emacs.gnus.general Subject: Re: funny problems with nnmail-cache and split-fancy-with-parent Date: Tue, 07 May 2002 10:28:19 -0400 Sender: owner-ding@hpc.uh.edu Message-ID: <87r8ko822k.fsf@alum.wpi.edu> References: <87offy9v9p.fsf@alum.wpi.edu> <87vga5xnfc.fsf@alum.wpi.edu> <87n0vh13er.fsf@alum.wpi.edu> NNTP-Posting-Host: localhost.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=iso-8859-1 Content-Transfer-Encoding: 8bit X-Trace: main.gmane.org 1020781701 4482 127.0.0.1 (7 May 2002 14:28:21 GMT) X-Complaints-To: usenet@main.gmane.org NNTP-Posting-Date: Tue, 7 May 2002 14:28:21 +0000 (UTC) Return-path: Original-Received: from malifon.math.uh.edu ([129.7.128.13]) by main.gmane.org with esmtp (Exim 3.33 #1 (Debian)) id 1755wz-0001AB-00 for ; Tue, 07 May 2002 16:28:21 +0200 Original-Received: from sina.hpc.uh.edu ([129.7.128.10] ident=lists) by malifon.math.uh.edu with esmtp (Exim 3.20 #1) id 1755w4-0004NU-00; Tue, 07 May 2002 09:27:24 -0500 Original-Received: by sina.hpc.uh.edu (TLB v0.09a (1.20 tibbs 1996/10/09 22:03:07)); Tue, 07 May 2002 09:27:40 -0500 (CDT) Original-Received: from sclp3.sclp.com (qmailr@sclp3.sclp.com [209.196.61.66]) by sina.hpc.uh.edu (8.9.3/8.9.3) with SMTP id JAA07752 for ; Tue, 7 May 2002 09:27:26 -0500 (CDT) Original-Received: (qmail 8507 invoked by alias); 7 May 2002 14:27:05 -0000 Original-Received: (qmail 8502 invoked from network); 7 May 2002 14:27:05 -0000 Original-Received: from quimby.gnus.org (80.91.224.244) by gnus.org with SMTP; 7 May 2002 14:27:05 -0000 Original-Received: from news by quimby.gnus.org with local (Exim 3.12 #1 (Debian)) id 17563I-00079x-00 for ; Tue, 07 May 2002 16:34:52 +0200 Original-To: ding@gnus.org Original-Path: not-for-mail Original-Newsgroups: gnus.ding Original-Lines: 54 Original-NNTP-Posting-Host: lowell.missioncriticallinux.com Original-X-Trace: quimby.gnus.org 1020782092 27524 64.244.21.16 (7 May 2002 14:34:52 GMT) Original-X-Complaints-To: usenet@quimby.gnus.org Original-NNTP-Posting-Date: 7 May 2002 14:34:52 GMT X-PGP-KeyID: 6B21489A X-Face: C%mBb*K1^od)w'=CH$WEZu/M^aR<,.n|1uAe,;MyNLKoel>F;-j[`L!>m:Y%/R}m&4&xuIM R%7Ez?vbd*Ns>VE;{\(yl|mGByV{D:Dm>'52].@P&t_s^,.d Strange. I don't know why that could be. But you could trace the > relevant code... Well, here's the problem. In nnmail-cache-insert -- (let ((g nil)) (cond (grp (setq g grp)) ((and (boundp 'group) group) (setq g group)) ((and (boundp 'group-art-list) group-art-list (listp group-art-list)) (setq g (caar group-art-list))) ((and (boundp 'group-art) group-art (listp group-art)) (setq g (caar group-art))) (t (setq g ""))) group is bound to "misc" (almost always). (caar group-art) returns the correct group name for splitting, but since this logic checks group first, it gets the wrong value. diff -u -r6.39 nnmail.el --- lisp/nnmail.el 2002/04/29 20:08:18 6.39 +++ lisp/nnmail.el 2002/05/07 14:29:55 @@ -1469,13 +1469,13 @@ (let ((g nil)) (cond (grp (setq g grp)) + ((and (boundp 'group-art) group-art (listp group-art)) + (setq g (caar group-art))) ((and (boundp 'group) group) (setq g group)) ((and (boundp 'group-art-list) group-art-list (listp group-art-list)) (setq g (caar group-art-list))) - ((and (boundp 'group-art) group-art (listp group-art)) - (setq g (caar group-art))) (t (setq g ""))) (unless (gnus-buffer-live-p nnmail-cache-buffer) (nnmail-cache-open)) Works for me, but after looking at this -- shouldn't there be a better interface into nnmail-cache-insert? We should go through and find all the places which call it, which is only 10 places, and use the optional argument for group name if possible. checking for bound symbols and using heuristics to get the group name seems a little hackish to me ;) (no offense to Kai!) ttyl, -- Josh Huber