From: jari.aalto@poboxes.com (Jari Aalto+mail.emacs)
Subject: 0.79 nnmail-spool-file 'directory read error (patch included)
Date: 28 Feb 1999 16:44:55 +0200 [thread overview]
Message-ID: <tbn21ymvtk.fsf@blue.sea.net> (raw)
Downloaded latest 0.79 and wondered why command
my-gnus-group-get-new-news-this-group
No more read the nnml procmail spool files. I chased it to the wrong
regexp definition in nnmail::mail-source-fetch. Since the files all have
suffix ".spool" the regexp never matches due to extra "$".
(setq-default nnmail-spool-file
(list
(list 'file ':path (getenv "MAIL"))
(list 'directory ':path spool ':suffix ".spool") ;; .prcml
))
The problem crystalized in mail-source-fetch-directory.
jari
(dolist (file (directory-files
path t (concat (regexp-quote suffix) "$")))
>> already filters .spool
(d!! (file-name-nondirectory file)
predicate
callback
"\n\n"
)
(when (and (file-regular-p file)
(funcall predicate file)
>> but this will never accept file mail.default.spool
(mail-source-movemail file mail-source-crash-box))
(incf found (mail-source-callback callback file))))
found)))
--- nnmail.el.orig Sun Feb 28 16:36:36 1999
+++ nnmail.el Sun Feb 28 16:36:47 1999
@@ -1379,8 +1379,8 @@
(setq source (append source
(list :predicate
`(lambda (file)
- (string-match
- ,(concat (regexp-quote group) "$")
+ (string-match
+ ,(concat (regexp-quote group) )
file))))))
(when nnmail-fetched-sources
(if (member source nnmail-fetched-sources)
next reply other threads:[~1999-02-28 14:44 UTC|newest]
Thread overview: 2+ messages / expand[flat|nested] mbox.gz Atom feed top
1999-02-28 14:44 Jari Aalto+mail.emacs [this message]
1999-03-01 15:51 ` Lars Magne Ingebrigtsen
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=tbn21ymvtk.fsf@blue.sea.net \
--to=jari.aalto@poboxes.com \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for NNTP newsgroup(s).