From mboxrd@z Thu Jan 1 00:00:00 1970 X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.general/24752 Path: main.gmane.org!not-for-mail From: "David Z. Maze" Newsgroups: gmane.emacs.gnus.general Subject: Attempted expiry on numeric group folders Date: 22 Aug 1999 20:51:38 -0400 Sender: owner-ding@hpc.uh.edu Message-ID: <87u2prjp45.fsf@donut.mit.edu> NNTP-Posting-Host: coloc-standby.netfonds.no Mime-Version: 1.0 Content-Type: multipart/mixed; boundary="=-=-=" X-Trace: main.gmane.org 1035162265 10458 80.91.224.250 (21 Oct 2002 01:04:25 GMT) X-Complaints-To: usenet@main.gmane.org NNTP-Posting-Date: Mon, 21 Oct 2002 01:04:25 +0000 (UTC) Return-Path: Original-Received: from farabi.math.uh.edu (farabi.math.uh.edu [129.7.128.57]) by sclp3.sclp.com (8.8.5/8.8.5) with ESMTP id UAA13426 for ; Sun, 22 Aug 1999 20:57:19 -0400 (EDT) Original-Received: from sina.hpc.uh.edu (lists@Sina.HPC.UH.EDU [129.7.3.5]) by farabi.math.uh.edu (8.9.3/8.9.3) with ESMTP id TAB20708; Sun, 22 Aug 1999 19:52:31 -0500 (CDT) Original-Received: by sina.hpc.uh.edu (TLB v0.09a (1.20 tibbs 1996/10/09 22:03:07)); Sun, 22 Aug 1999 19:52:43 -0500 (CDT) Original-Received: from sclp3.sclp.com (root@sclp3.sclp.com [204.252.123.139]) by sina.hpc.uh.edu (8.9.3/8.9.3) with ESMTP id TAA03636 for ; Sun, 22 Aug 1999 19:52:34 -0500 (CDT) Original-Received: from donut.mit.edu (mail@DONUT.MIT.EDU [18.208.0.22]) by sclp3.sclp.com (8.8.5/8.8.5) with ESMTP id UAA13301 for ; Sun, 22 Aug 1999 20:51:41 -0400 (EDT) Original-Received: from dmaze by donut.mit.edu with local (Exim 3.03 #1 (Debian)) id 11IiKq-0005CM-00; Sun, 22 Aug 1999 20:51:40 -0400 Original-To: ding@gnus.org Original-Lines: 21 User-Agent: Gnus/5.070095 (Pterodactyl Gnus v0.95) XEmacs/20.4 (Emerald) X-Attribution: DZM Precedence: list X-Majordomo: 1.94.jlt7 Xref: main.gmane.org gmane.emacs.gnus.general:24752 X-Report-Spam: http://spam.gmane.org/gmane.emacs.gnus.general:24752 --=-=-= As a result of MIT's class naming scheme, I have several folders of the form nnml:mail.classes.6.001, ...6.170, and so on. I also have a general folder nnml:mail.classes.6 which is used for an announcement list for all things pertaining to the department of Electrical Engineering and Computer Science (Course 6), which is total-expirable. I noticed today (using pgnus 0.95 under XEmacs 20.4) that Gnus was trying to expire ~/Mail/mail/classes/6/001, even though that's a group directory rather than an nnml message file. This is because nnheader-directory-articles doesn't look to see whether the files nnheader-directory-files-safe returns are directories or not. This can be fixed by tweaking the arguments passed to directory-files, which the attached patch to nnheader.el does. --=-=-= Content-Type: text/x-patch Content-Disposition: attachment; filename=nnheader-diff Content-Description: Patch to nnheader.el to make directories not be articles --- nnheader.el.orig Sun Aug 22 20:45:22 1999 +++ nnheader.el Sun Aug 22 20:45:56 1999 @@ -584,13 +584,13 @@ "Return a list of all article files in a directory." (mapcar 'nnheader-file-to-number (nnheader-directory-files-safe - dir nil nnheader-numerical-short-files t))) + dir nil nnheader-numerical-short-files t t))) (defun nnheader-article-to-file-alist (dir) "Return an alist of article/file pairs in DIR." (mapcar (lambda (file) (cons (nnheader-file-to-number file) file)) (nnheader-directory-files-safe - dir nil nnheader-numerical-short-files t))) + dir nil nnheader-numerical-short-files t t))) (defun nnheader-fold-continuation-lines () "Fold continuation lines in the current buffer." --=-=-= -- David Maze dmaze@mit.edu http://donut.mit.edu/dmaze/ "Hey, Doug, do you mind if I push the Emergency Booth Self-Destruct Button?" "Oh, sure, Dave, whatever...you _do_ know what that does, right?" --=-=-=--