From mboxrd@z Thu Jan  1 00:00:00 1970
X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.general/21672
Path: main.gmane.org!not-for-mail
From: Lars Magne Ingebrigtsen <larsi@gnus.org>
Newsgroups: gmane.emacs.gnus.general
Subject: Re: 0.79 nnmail-spool-file 'directory read error (patch included)
Date: 01 Mar 1999 16:51:13 +0100
Sender: owner-ding@hpc.uh.edu
Message-ID: <m3678lgqdq.fsf@quimbies.gnus.org>
References: <tbn21ymvtk.fsf@blue.sea.net>
NNTP-Posting-Host: coloc-standby.netfonds.no
Mime-Version: 1.0
Content-Type: text/plain; charset=us-ascii
X-Trace: main.gmane.org 1035159733 24160 80.91.224.250 (21 Oct 2002 00:22:13 GMT)
X-Complaints-To: usenet@main.gmane.org
NNTP-Posting-Date: Mon, 21 Oct 2002 00:22:13 +0000 (UTC)
Return-Path: <owner-ding@hpc.uh.edu>
Original-Received: from spinoza.math.uh.edu (spinoza.math.uh.edu [129.7.128.18])
	by sclp3.sclp.com (8.8.5/8.8.5) with ESMTP id LAA19048
	for <jason@mailhost.sclp.com>; Mon, 1 Mar 1999 11:08:47 -0500 (EST)
Original-Received: from sina.hpc.uh.edu (Sina.HPC.UH.EDU [129.7.3.5])
	by spinoza.math.uh.edu (8.9.1/8.9.1) with ESMTP id KAB12276;
	Mon, 1 Mar 1999 10:07:38 -0600 (CST)
Original-Received: by sina.hpc.uh.edu (TLB v0.09a (1.20 tibbs 1996/10/09 22:03:07)); Mon, 01 Mar 1999 10:08:21 -0600 (CST)
Original-Received: from sclp3.sclp.com (root@sclp3.sclp.com [204.252.123.139]) by sina.hpc.uh.edu (8.7.3/8.7.3) with ESMTP id KAA16118 for <ding@hpc.uh.edu>; Mon, 1 Mar 1999 10:08:11 -0600 (CST)
Original-Received: from quimbies.gnus.org (larsi@ppp028.uio.no [129.240.240.29])
	by sclp3.sclp.com (8.8.5/8.8.5) with ESMTP id LAA19008
	for <ding@gnus.org>; Mon, 1 Mar 1999 11:07:54 -0500 (EST)
Original-Received: (from larsi@localhost)
	by quimbies.gnus.org (8.8.7/8.8.7) id RAA10140;
	Mon, 1 Mar 1999 17:07:22 +0100
Mail-Copies-To: never
X-Now-Reading: James Tiptree Jr.'s _Ten Thousand Light-Years From Home_
X-Now-Playing: The Clash's _Sandinista!_
Original-To: ding@gnus.org
In-Reply-To: jari.aalto@poboxes.com's message of "28 Feb 1999 16:44:55 +0200"
User-Agent: Gnus/5.07008 (Pterodactyl Gnus v0.80) XEmacs/21.2(beta3) (Aglaia)
X-Face: &w!^oO<W.WBH]FsTP:P0f9X6M-ygaADlA_)eF$<UwQzj7:C=Gi<a?/_4$LX^@$Qq7-O&XHp
 lDARi8e8iT<(A$LWAZD*xjk^')/wI5nG;1cNB>~dS|}-P0~ge{$c!h\<y
Original-Lines: 38
Precedence: list
X-Majordomo: 1.94.jlt7
Xref: main.gmane.org gmane.emacs.gnus.general:21672
X-Report-Spam: http://spam.gmane.org/gmane.emacs.gnus.general:21672

jari.aalto@poboxes.com (Jari Aalto+mail.emacs) writes:

>       (dolist (file (directory-files
> 		     path t (concat (regexp-quote suffix) "$")))
> 
> >> already filters .spool

Yes...

> 
> 	(d!! (file-name-nondirectory file) 
> 	     predicate
> 	     callback
> 	     "\n\n"
> 	     )

Hm?  I can't find this in the sources...

> 	(when (and (file-regular-p file)
> 		   (funcall predicate file)
> 
> >> but this will never accept file mail.default.spool

I don't see why not.  The predicate is either `identity' or

                                   `(lambda (file)
				     (string-match 
				      ,(concat
					(regexp-quote (concat group suffix)) 
					"$")
				      file))

And if the group is "mail.default" and the suffix is ".spool", then
that predicate should return non-nil.

-- 
(domestic pets only, the antidote for overdose, milk.)
  larsi@gnus.org * Lars Magne Ingebrigtsen