Pterodactyl Gnus v0.73 is released

Pterodactyl Gnus v0.73 is released

[Lars Magne Ingebrigtsen]

Danger, danger!  NB!  Mail fetching makeover!  NB!  Danger, danger!

I've redone the parts of Gnus that deals with fetching mail.  The new
functions are in the new file mail-source.el, and nnmail.el is about
as much smaller as the new file is big, by some strange, strange
coinkidink.

Anyway, nnmail-spool-file has a new syntax, although some of the old
syntax is still supported.  mail-source.el isn't documented anywhere
yet, but take a look at the file and see what you think.

Anyone who wants to implement qmail maildir support is welcome to do
so.  I think it'll probably be very simple to do in the new framework.

Get it from <URL:http://www.gnus.org/dist/pgnus.tar.gz> or
"/ftp@quimby.gnus.org:/pub/gnus/".  The patch is available as
<URL:ftp://quimby.gnus.org/pub/gnus/ding-patches/pgnus-0.72-0.73.diff.gz>.

ChangeLog since last release:

Sat Jan 23 14:23:27 1999  Lars Magne Ingebrigtsen  <larsi@menja.ifi.uio.no>

	* gnus.el: Pterodactyl Gnus v0.73 is released.

1999-01-23 11:38:36  Lars Magne Ingebrigtsen  <larsi@gnus.org>

	* nnmail.el (nnmail-spool-file): Changed to use mail-source.
	(nnmail-crash-box, nnmail-use-procmail, nnmail-procmail-directory,
	nnmail-procmail-suffix, nnmail-resplit-incoming): Removed.
	(nnmail-movemail-program): Removed.
	(nnmail-movemail-args): Removed.
	(nnmail-pop-password-required): Ditto.
	(nnmail-tmp-directory): Ditto.
	(nnmail-delete-incoming): Removed.
	(nnmail-pop-password, nnmail-moved-inboxes,
	nnmail-internal-password, nnmail-move-inbox): Removed.
	(nnmail-read-passwd): Ditto.
	(nnmail-get-spool-files): Removed.
	(nnmail-resplit-incoming): Reinstated.

	* mail-source.el: New file.

1999-01-23 09:08:31  James H. Cloos, Jr.  <cloos@jhcloos.com>

	* gnus-art.el (gnus-article-mode-map): Bind backspace.

1999-01-23 09:05:04  Lars Magne Ingebrigtsen  <larsi@gnus.org>

	* gnus-art.el (article-make-date-line): Fix iso8601 display.

1999-01-20 02:53:52  Lars Magne Ingebrigtsen  <larsi@gnus.org>

	* gnus-art.el (gnus-treat-display-smileys): Check xpm.

	* gnus-picon.el (gnus-group-display-picons): Goto body.

	* gnus.el: Indented all functions; broke long lines; changed all
 	instances of illegal/legal to invalid/valid.  Yes, I'm bored.



-- 
(domestic pets only, the antidote for overdose, milk.)
  larsi@ifi.uio.no * Lars Magne Ingebrigtsen

Re: Pterodactyl Gnus v0.73 is released

[Kai Haberzettl]

I get this error when entering mails and articles:

Signaling: (beginning-of-buffer)
  backward-char(1)
  gnus-group-display-picons()
  gnus-article-display-picons()
  gnus-treat-article(head)
  gnus-display-mime()
  gnus-article-prepare-display()
  gnus-article-prepare(4397 nil)
  gnus-summary-display-article(4397 nil)
  gnus-summary-select-article(nil nil pseudo)
  gnus-summary-scroll-up(1)
  call-interactively(gnus-summary-scroll-up)

Kai
-- 
"We had it tough ... I had to get up at 9 o'clock at night, half
an hour before I went to bed, eat a lump of dry poison, work 29
hours down mill, and when we came home our Dad would kill us,
and dance about on our grave singing Haleleuia ..."  -- Monty Python

Re: Pterodactyl Gnus v0.73 is released

[Lars Magne Ingebrigtsen]

Kai Haberzettl <khaberz@synnet.de> writes:

> Signaling: (beginning-of-buffer)
>   backward-char(1)
>   gnus-group-display-picons()

Yup.  Fix in Pterodactyl Gnus v0.74.

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

Re: Pterodactyl Gnus v0.73 is released

[Lloyd Zusman]

I'm using pgnus-0.70 and trying pgnus-0.73 within XEmacs 21.2-beta4.

Lars Magne Ingebrigtsen <larsi@ifi.uio.no> writes:

> [ ... ]
> 
> Anyway, nnmail-spool-file has a new syntax, although some of the old
> syntax is still supported.  mail-source.el isn't documented anywhere
> yet, but take a look at the file and see what you think.

I want to get the same functionality I previously got via `procmail'
using this new 0.73 email functionality.  In other words, I want mail
spool files of the form "<whatever>.suffix" to be split into mailboxes
whose names are <whatever>.

Is there a way to do this in 0.73?  The old procmail functionality
has disappeared, and I'm not sure how to compensate for it, even
though I've been digging through `mail-source.el'.

Any suggestions?

Thanks in advance.

-- 
 Lloyd Zusman
 ljz@asfast.com

Re: Pterodactyl Gnus v0.73 is released

[Lloyd Zusman]

A small correction:


Lloyd Zusman <ljz@asfast.com> writes:

> [ ... ] In other words, I want mail
> spool files of the form "<whatever>.suffix" to be split into mailboxes
> whose names are <whatever>.

Correction:  replace the word "split" with the word "stored".  Sorry
for the confusion.

> [ ... ]


-- 
 Lloyd Zusman
 ljz@asfast.com

Re: Pterodactyl Gnus v0.73 is released

[Lars Magne Ingebrigtsen]

Lloyd Zusman <ljz@asfast.com> writes:

> I want to get the same functionality I previously got via `procmail'
> using this new 0.73 email functionality.  In other words, I want mail
> spool files of the form "<whatever>.suffix" to be split into mailboxes
> whose names are <whatever>.

I think the following mail source specification should probably do the 
trick:

(directory :path "/where/the/promail/stuff/is/" :suffix "suffix")

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

Procmail functionality (Was: Pterodactyl Gnus v0.73 is released)

[Lloyd Zusman]

Lars Magne Ingebrigtsen <larsi@gnus.org> writes:

> Lloyd Zusman <ljz@asfast.com> writes:
> 
> > I want to get the same functionality I previously got via `procmail'
> > [ ... ]
>
> I think the following mail source specification should probably do the 
> trick:
> 
> (directory :path "/where/the/promail/stuff/is/" :suffix "suffix")

Thanks!

First of all, there are a couple bugs in `mail-source.el' and
`nnmail.el' concerning suffix handling (a couple calls to `concat'
and `regexp-quote' were reversed).  I have enclosed patches below.

And even after applying these fixes, your suggestion still doesn't
quite work for me ... the email found the specified directory in files
with the specified suffix all goes into the crash box instead of the
appropriate mailboxes.  Does something else have to be set in addition
to what you specified in order for the matched mail spool files to be
read into my existing email groups instead of the crash box?


Patches:

*** mail-source.el.orig	Sun Jan 24 23:05:21 1999
--- mail-source.el	Sun Jan 24 23:32:46 1999
***************
*** 303,309 ****
    (mail-source-bind directory source
      (let ((files (directory-files
  		  path t
! 		  (or match (concat (regexp-quote suffix) "$"))))
  	  (found 0)
  	  file)
        (while (setq file (pop files))
--- 303,309 ----
    (mail-source-bind directory source
      (let ((files (directory-files
  		  path t
! 		  (or match (regexp-quote (concat suffix "$")))))
  	  (found 0)
  	  file)
        (while (setq file (pop files))

*** nnmail.el.orig	Sun Jan 24 23:34:27 1999
--- nnmail.el	Sun Jan 24 23:32:35 1999
***************
*** 508,514 ****
    (if (eq (car source) 'directory)
        (let ((file (file-name-nondirectory file)))
  	(mail-source-bind directory source
! 	  (if (string-match (concat (regexp-quote suffix "$") file))
  	      (substring file 0 (match-beginning 0))
  	    nil)))
      nil))
--- 508,514 ----
    (if (eq (car source) 'directory)
        (let ((file (file-name-nondirectory file)))
  	(mail-source-bind directory source
! 	  (if (string-match (regexp-quote (concat suffix "$")) file)
  	      (substring file 0 (match-beginning 0))
  	    nil)))
      nil))


-- 
 Lloyd Zusman
 ljz@asfast.com

Re: Procmail functionality (Was: Pterodactyl Gnus v0.73 is released)

[Lars Magne Ingebrigtsen]

Lloyd Zusman <ljz@asfast.com> writes:

> First of all, there are a couple bugs in `mail-source.el' and
> `nnmail.el' concerning suffix handling (a couple calls to `concat'
> and `regexp-quote' were reversed).  I have enclosed patches below.

[...]

> ***************
> *** 303,309 ****
>     (mail-source-bind directory source
>       (let ((files (directory-files
>   		  path t
> ! 		  (or match (concat (regexp-quote suffix) "$"))))
>   	  (found 0)
>   	  file)
>         (while (setq file (pop files))
> --- 303,309 ----
>     (mail-source-bind directory source
>       (let ((files (directory-files
>   		  path t
> ! 		  (or match (regexp-quote (concat suffix "$")))))
>   	  (found 0)
>   	  file)
>         (while (setq file (pop files))

No, we don't want to regexp-quote the "$".  Or do you have files that
are actually called "file.spool$"?

> And even after applying these fixes, your suggestion still doesn't
> quite work for me ... the email found the specified directory in files
> with the specified suffix all goes into the crash box instead of the
> appropriate mailboxes.

The mail is moved to the crash box, and then it's split from there
into the groups.

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

Re: Procmail functionality

[Lloyd Zusman]

Lars Magne Ingebrigtsen <larsi@gnus.org> writes:

> No, we don't want to regexp-quote the "$".  Or do you have files that
> are actually called "file.spool$"?

Well, of course you're right.  I had misunderstood the problem, but
there really *is* still an error in the call to `regexp-quote' that's
in `nnmail.el'.  I get an abort message that says that there are two
many arguments supplied to that function.  I believe that the patch
below is more correct and actually fixes this properly this time.

> > And even after applying these fixes, your suggestion still doesn't
> > quite work for me ... the email found the specified directory in files
> > with the specified suffix all goes into the crash box instead of the
> > appropriate mailboxes.
> 
> The mail is moved to the crash box, and then it's split from there
> into the groups.

Yes ... now I understand this better ... and once I fixed this
`regexp-quote' problem in the proper manner instead of how I did it
before, my mail is now correctly going to the intended email
newsgroups.  What was happening before was that everything in the
specified directory was ending up in the default `mail.misc'
newsgroup.  I erroneously thought that this had to do with the crash
box instead of its real cause (my incorrect patch).


Here's the patch fixing the incorrect call to `regexp-quote'.  Note in
the original that "$" is erroneously being passed as the second
argument to `regexp-quote' ...


*** nnmail.el.orig      Mon Jan 25 00:39:16 1999
--- nnmail.el   Mon Jan 25 00:40:06 1999
***************
*** 508,514 ****
    (if (eq (car source) 'directory)
        (let ((file (file-name-nondirectory file)))
        (mail-source-bind directory source
!         (if (string-match (concat (regexp-quote suffix "$") file))
              (substring file 0 (match-beginning 0))
            nil)))
      nil))
--- 508,514 ----
    (if (eq (car source) 'directory)
        (let ((file (file-name-nondirectory file)))
        (mail-source-bind directory source
!         (if (string-match (concat (regexp-quote suffix) "$") file)
              (substring file 0 (match-beginning 0))
            nil)))
      nil))

-- 
 Lloyd Zusman
 ljz@asfast.com

Re: Procmail functionality

[Lars Magne Ingebrigtsen]

Lloyd Zusman <ljz@asfast.com> writes:

> I believe that the patch
> below is more correct and actually fixes this properly this time.

Thanks for the patch; I've applied it to Pterodactyl Gnus v0.74.

It's strange that the byte-compiler didn't warn me about this...

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

Re: Pterodactyl Gnus v0.73 is released

[Michael Welsh Duggan]

[-- Attachment #1: Type: text/plain, Size: 1262 bytes --]

Ordinarily, I would send this bug-report via the `gnus-bug' interface,
but it has been my experience that bugs posted to the group get fixed
faster than ones sent via `gnus-bug'.  And these are, IMHO, some
fairly serious bugs.  So here we are.  If you would prefer me to not
send such bug reports to the list again, just say so (publicly,
please).  Thanks.

Pterodactyl Gnus v0.73
GNU Emacs 20.3.3 (powerpc-ibm-aix4.1.4.0, X toolkit)
 of Fri Aug 21 1998 on peoria.mt.cs.cmu.edu
200 lyris.teleport.com Lyris NNTP Service ready (posting ok).

Okay, here are a set of bugs related to the new mail handling stuff:

1) `mail-source-fetch-pop' is not robust with respect to pop
   failures.  pop3.el signals an error which needs to be caught:

      (if (looking-at "-ERR")
          (signal 'error (list (buffer-substring (point) (- match-end 2))))

2) `mail-source-callback' has a problem which causes a program
   failure.  The following section:

  (if (or (not (file-exists-p mail-source-crash-box))
          (zerop (nth 7 (file-attributes mail-source-crash-box))))
      (progn
        (delete-file mail-source-crash-box)
        0)

  potentially calls `delete-file' on an empty file, which signals an
  error.  Here is the backtrace (with passwords elided):


[-- Attachment #2: Backtrace of error --]
[-- Type: text/plain, Size: 4607 bytes --]

Signaling: (file-error "Removing old name" "no such file or directory" "/home/md5i/.emacs-mail-crash-box")
  delete-file("~/.emacs-mail-crash-box")
  (progn (delete-file mail-source-crash-box) 0)
  (if (or (not ...) (zerop ...)) (progn (delete-file mail-source-crash-box) 0) (funcall callback mail-source-crash-box info) (if mail-source-delete-incoming (delete-file mail-source-crash-box) (let ... ... ...)) 1)
  mail-source-callback((lambda (file orig-file) (nnmail-split-incoming file (quote nnml-save-mail) (quote nil) (nnmail-get-split-group orig-file source) (quote nnml-active-number))) "nl.cs.cmu.edu")
  (if (pop3-movemail mail-source-crash-box) (mail-source-callback callback server) (setq mail-source-password-cache (delq ... mail-source-password-cache)) 0)
  (let ((pop3-password password) (pop3-maildrop user) (pop3-mailhost server)) (if (pop3-movemail mail-source-crash-box) (mail-source-callback callback server) (setq mail-source-password-cache ...) 0))
  (let ((from ...)) (setq password (or password ... ...)) (unless (assoc from mail-source-password-cache) (push ... mail-source-password-cache)) (let (... ... ...) (if ... ... ... 0)))
  (let ((password nil) (user nil) (port nil) (server nil)) (mail-source-set-1 source) (let (...) (setq password ...) (unless ... ...) (let ... ...)))
  (mail-source-bind pop source (let (...) (setq password ...) (unless ... ...) (let ... ...)))
  mail-source-fetch-pop((pop :user "md5i" :server "nl.cs.cmu.edu" :password "xxxxx") (lambda (file orig-file) (nnmail-split-incoming file (quote nnml-save-mail) (quote nil) (nnmail-get-split-group orig-file source) (quote nnml-active-number))))
  funcall(mail-source-fetch-pop (pop :user "md5i" :server "nl.cs.cmu.edu" :password "ikkoku") (lambda (file orig-file) (nnmail-split-incoming file (quote nnml-save-mail) (quote nil) (nnmail-get-split-group orig-file source) (quote nnml-active-number))))
  (+ found (funcall function source callback))
  (let ((function ...) (found 0)) (unless function (error "%S is an invalid mail source specification" source)) (when (file-exists-p mail-source-crash-box) (message "Processing mail from %s..." mail-source-crash-box) (setq found ...)) (+ found (funcall function source callback)))
  mail-source-fetch((pop :user "md5i" :server "nl.cs.cmu.edu" :password "xxxxx") (lambda (file orig-file) (nnmail-split-incoming file (quote nnml-save-mail) (quote nil) (nnmail-get-split-group orig-file source) (quote nnml-active-number))))
  (if (mail-source-fetch source (\` ...)) (progn (incf i)))
  (when (mail-source-fetch source (\` ...)) (incf i))
  (while (setq source (pop sources)) (when (stringp source) (setq source ...)) (nnheader-message 3 "%s: Reading incoming mail %S..." method source) (when (mail-source-fetch source ...) (incf i)))
  (progn (nnmail-activate method) (run-hooks (quote nnmail-pre-get-new-mail-hook)) (nnmail-cache-open) (while (setq source ...) (when ... ...) (nnheader-message 3 "%s: Reading incoming mail %S..." method source) (when ... ...)) (unless (zerop i) (nnmail-save-active ... ...) (when exit-func ...) (run-hooks ...) (nnheader-message 3 "%s: Reading incoming mail...done" method)) (nnmail-cache-close) (run-hooks (quote nnmail-post-get-new-mail-hook)))
  (if (and (nnmail-get-value "%s-get-new-mail" method) nnmail-spool-file) (progn (nnmail-activate method) (run-hooks ...) (nnmail-cache-open) (while ... ... ... ...) (unless ... ... ... ... ...) (nnmail-cache-close) (run-hooks ...)))
  (when (and (nnmail-get-value "%s-get-new-mail" method) nnmail-spool-file) (nnmail-activate method) (run-hooks (quote nnmail-pre-get-new-mail-hook)) (nnmail-cache-open) (while (setq source ...) (when ... ...) (nnheader-message 3 "%s: Reading incoming mail %S..." method source) (when ... ...)) (unless (zerop i) (nnmail-save-active ... ...) (when exit-func ...) (run-hooks ...) (nnheader-message 3 "%s: Reading incoming mail...done" method)) (nnmail-cache-close) (run-hooks (quote nnmail-post-get-new-mail-hook)))
  (let* ((sources ...) (group-in group) (i 0) nnmail-current-spool incoming incomings source) (when (and ... nnmail-spool-file) (nnmail-activate method) (run-hooks ...) (nnmail-cache-open) (while ... ... ... ...) (unless ... ... ... ... ...) (nnmail-cache-close) (run-hooks ...)))
  nnmail-get-new-mail(nnml nnml-save-nov "~/Mail/" nil)
  nnml-request-scan(nil "~/Mail")
  gnus-request-scan(nil (nnml "~/Mail"))
  gnus-read-active-file(nil nil)
  gnus-setup-news(nil nil nil)
  byte-code("\b„\x0e
  gnus-1(nil nil nil)
  gnus(nil)
* call-interactively(gnus)
  execute-extended-command(nil)
* call-interactively(execute-extended-command)

[-- Attachment #3: Type: text/plain, Size: 5969 bytes --]


3) `nnmail-get-new-mail' outputs a status message with
   `nnheader-message' which is a) unsuited to the new source format,
   and b) outputs any included passwords, which get saved in the
   *Messages* buffer.

4) After fetching, I end up with a `*' next to all my mail groups in
   the *Groups* buffer.  I can read them with
   `gnus-group-select-group' nonetheless, but this is rather annoying.


------------------ Environment follows ------------------

(setq gnus-default-nntp-server "")
(setq gnus-select-method
      '(nntp "dnntp.srv.cs.cmu.edu"
             (nntp-address "dnntp.srv.cs.cmu.edu")
             (nntp-server-xover "XOVER")
             (nntp-authinfo-function 'nntp-send-authinfo-from-file)))
(setq gnus-message-archive-group
      '((if
            (message-news-p)
            "misc-news" "misc-mail")))
(setq gnus-secondary-select-methods
      '((nnml "~/Mail")))
(setq gnus-use-adaptive-scoring t)
(setq gnus-use-cache t)
(setq gnus-expert-user t)
(setq gnus-mode-non-string-length 35)
(setq gnus-auto-select-first nil)
(setq gnus-single-article-buffer nil)
(setq gnus-thread-sort-functions
      '(gnus-thread-sort-by-number gnus-thread-sort-by-date gnus-thread-sort-by-score))
(setq gnus-no-groups-message "No news is horrible news")
(setq gnus-group-default-list-level 4)
(setq gnus-group-line-format "%M%S%p%P%5y: %(%G%) %z\n")
(setq gnus-ignored-headers
      '("^Old-" "^Reply-Path" "^Errors-To" "^Precedence" "^X-From-Line" "^Path:" "^Expires:" "^Date-Received:" "^References:" "^Xref:" "^Lines:" "^Relay-Version:" "^Message-ID:" "^Approved:" "^Sender:" "^Received:" "^X-UIDL:" "^MIME-Version:" "^Return-Path:" "^In-Reply-To:" "^Content-Type:" "^Content-Transfer-Encoding:" "^X-WebTV-Signature:" "^X-MimeOLE:" "^X-MSMail-Priority:" "^X-Priority:" "^X-Loop:" "^X-Authentication-Warning:" "^X-MIME-Autoconverted:" "^X-Face:" "^X-Attribution:" "^X-Originating-IP:" "^Delivered-To:" "^NNTP-[-A-Za-z]+:" "^Distribution:" "^X-no-archive:" "^X-Trace:" "^X-Complaints-To:" "^X-NNTP-Posting-Host:" "^X-Orig.*:" "^Abuse-Reports-To:" "^Cache-Post-Path:" "^X-Article-Creation-Date:" "^X-Poster:" "^X-Mail2News-Path:" "^X-Server-Date:" "^X-Cache:" "^Originator:" "^X-Problems-To:" "^X-Auth-User:" "^X-Post-Time:" "^X-Admin:" "^X-UID:" "^Resent-[-A-Za-z]+:" "^X-Mailing-List:" "^Precedence:" "^Original-[-A-Za-z]+:" "^X-filename:" "^X-Orcpt:" "^Old-Receive
 d!
!
:" "^X-Pgp-Fingerprint:" "^X-Pgp-Key-Id:" "^X-Pgp-Public-Key-Url:" "^X-Auth:" "^X-From-Line:" "^X-Gnus-Article-Number:" "^X-Majordomo:" "^X-Url:" "^X-Sender:" "^X-Mailing-List:" "^MBOX-Line" "^Priority:" "^X-Pgp" "^X400-[-A-Za-z]+:" "^Status:"))
(setq gnus-visible-headers nil)
(setq gnus-boring-article-headers
      '(empty newsgroups followup-to reply-to))
(setq gnus-article-mode-hook
      '(md5i-gnus-load-function))
(setq gnus-save-newsrc-file nil)
(setq gnus-always-read-dribble-file t)
(setq gnus-asynchronous nil)
;; (makeunbound 'gnus-use-article-prefetch)
;; (makeunbound 'gnus-prefetched-article-deletion-strategy)
;; (makeunbound 'gnus-use-header-prefetch)
;; (makeunbound 'gnus-async-prefetch-article-p)
(setq gnus-post-method 'current)
(setq gnus-score-expiry-days 30)
(setq gnus-default-adaptive-score-alist
      '((gnus-kill-file-mark)
        (gnus-unread-mark)
        (gnus-ticked-mark
         (subject 3)
         (followup 20))
        (gnus-dormant-mark
         (followup 5))
        (gnus-del-mark)
        (gnus-read-mark
         (subject 1))
        (gnus-catchup-mark)
        (gnus-killed-mark
         (subject -10)
         (followup -50))
        (gnus-expirable-mark)
        (gnus-low-score-mark)
        (gnus-ancient-mark)))
;; (makeunbound 'gnus-topic-mode)
;; (makeunbound 'gnus-topic-mode-hook)
;; (makeunbound 'gnus-topic-line-format)
;; (makeunbound 'gnus-topic-indent-level)
;; (makeunbound 'gnus-topic-display-empty-topics)
(setq nnmail-split-methods 'nnmail-split-fancy)
(setq nnmail-use-long-file-names t)
(setq nnmail-spool-file
      '((pop :user "md5i" :server "nl.cs.cmu.edu" :password "xxxxx")))
(setq nnmail-crosspost-link-function 'make-symbolic-link)
(setq nnmail-split-fancy
      '(|
        (any "m?duggan@\\(ramlink\\|wwd\\)\\.net" "mail.family")
        (any "mi-trans-command" "mail.mi-trans-admin")
        ("subject" "\\(cat\\|kantoo\\)/[0-9]+:.*" "mail.gnats")
        (&
         (|
          (from "\\(eric\\|svoboda\\|teruko\\|igo\\|klb\\).*cmu" "mail.job")
          (from "Kathryn_Baker" "mail.job")
          (from "[@.]cat\\.com" "mail.job")
          (any "catalyst-project" "mail.job")
          (any "pittcmulingannouncements" "mail.job")
          (any "lti-\\(seminar\\|staff\\)" "mail.job")
          (any "cyerthall" "mail.job")
          (to "chaos\\|md5i\\|duggan" "mail.misc"))
         (any "fansubsnet" "mail.fansub")
         (any "ssa-ml" "mail.ssa")
         (any "ding" "mail.Gnus")
         (any "gwm" "mail.gwm")
         (any "mi@ml\\.usagi\\.org" "mail.mi")
         (any "mi-list\\|mlist-mi" "mail.mi")
         (any "mi-trans" "mail.MI-Translation")
         (any "mule" "mail.mule")
         (any "ntemacs-hackers" "mail.ntemacs-hackers")
         (any "ntemacs-users" "mail.ntemacs")
         (any "custom" "mail.custom")
         (any "w3" "mail.w3")
         (any "tsa-talk" "mail.tsa-talk")
         (any "kodocha" "mail.kodocha")
         (any "patlabor" "mail.patlabor")
         (any "emacs-unicode" "mail.unicode")
         (any "DILBERT_NEWS" "mail.misc")
         (any "anime-l" "mail.misc"))
        (to "cmu" "mail.misc")
        "mail.junk"))
(setq nnmail-treat-duplicates 'delete)
(setq message-user-organization "Carnegie Mellon University : KANTOO Project")
(setq message-post-method
      '(nnspool ""))
(setq message-mode-hook
      '(gnus-configure-posting-styles))
(setq message-header-setup-hook
      '(gnus-inews-insert-archive-gcc gnus-inews-insert-gcc))
(setq message-cite-function 'message-cite-original-without-signature)

-- 
Michael Duggan
(md5i@cs.cmu.edu)

Re: Pterodactyl Gnus v0.73 is released

[Lars Magne Ingebrigtsen]

Michael Welsh Duggan <md5i@cs.cmu.edu> writes:

> Ordinarily, I would send this bug-report via the `gnus-bug' interface,
> but it has been my experience that bugs posted to the group get fixed
> faster than ones sent via `gnus-bug'.

That depends on the phase of the moon.  But bug reports sent to
"larsi" probably get dealt with way slower than reports, er, anywhere
else. 

> 2) `mail-source-callback' has a problem which causes a program
>    failure.  The following section:

Yup.  Fix in Pterodactyl Gnus v0.74.

> 3) `nnmail-get-new-mail' outputs a status message with
>    `nnheader-message' which is a) unsuited to the new source format,
>    and b) outputs any included passwords, which get saved in the
>    *Messages* buffer.

Yup.  Fix in Pterodactyl Gnus v0.74.

> 4) After fetching, I end up with a `*' next to all my mail groups in
>    the *Groups* buffer.  I can read them with
>    `gnus-group-select-group' nonetheless, but this is rather annoying.

Hm.  I seem to be unable to reproduce this bug...

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

Re: Pterodactyl Gnus v0.73 is released

[Michael Welsh Duggan]

Lars Magne Ingebrigtsen <larsi@gnus.org> writes:

> Michael Welsh Duggan <md5i@cs.cmu.edu> writes:
>
> > 4) After fetching, I end up with a `*' next to all my mail groups in
> >    the *Groups* buffer.  I can read them with
> >    `gnus-group-select-group' nonetheless, but this is rather annoying.
> 
> Hm.  I seem to be unable to reproduce this bug...

It is reproducible at my end.  If you can give me a good point to
trace from and tell me what function call to look for, I will find out
what is happening.

-- 
Michael Duggan
(md5i@cs.cmu.edu)
.

Re: Pterodactyl Gnus v0.73 is released

[Lars Magne Ingebrigtsen]

Michael Welsh Duggan <md5i@cs.cmu.edu> writes:

> > > 4) After fetching, I end up with a `*' next to all my mail groups in
> > >    the *Groups* buffer.  I can read them with
> > >    `gnus-group-select-group' nonetheless, but this is rather annoying.
> > 
> > Hm.  I seem to be unable to reproduce this bug...
> 
> It is reproducible at my end.  If you can give me a good point to
> trace from and tell me what function call to look for, I will find out
> what is happening.

I think I've fixed this for 0.74.

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

Re: Pterodactyl Gnus v0.73 is released

[Michael Harnois]

On 25 Jan 1999 03:53:06 +0100, Lars Magne Ingebrigtsen <larsi@gnus.org> said:

    > I think the following mail source specification should probably
    > do the trick:

    > (directory :path "/where/the/promail/stuff/is/" :suffix
    > "suffix")

OK, call me stupid, but I can't figure out what the right syntax is
for doing this in my .gnus (and customize bombs on mail-source.) Would 
someone send me the correct line in all its glorious entirety?

-- 
Michael D. Harnois, Redeemer Lutheran Church, Washburn, IA 
mharnois@willinet.net                      aa0bt@aa0bt.ampr.org 
 There are three steps in the revelation of any truth: in the 
 first, it is ridiculed; in the second, resisted; in the 
 third, it is considered self-evident. -- Arthur Schopenhauer

Re: Pterodactyl Gnus v0.73 is released

[Lars Magne Ingebrigtsen]

Michael Harnois <mharnois@willinet.net> writes:

>     > (directory :path "/where/the/promail/stuff/is/" :suffix
>     > "suffix")
> 
> OK, call me stupid, but I can't figure out what the right syntax is
> for doing this in my .gnus (and customize bombs on mail-source.) Would 
> someone send me the correct line in all its glorious entirety?

(setq nnmail-spool-file
      '((directory :path "/where/the/promail/stuff/is/" :suffix "suffix")))

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

Re: Pterodactyl Gnus v0.73 is released

[Michael Welsh Duggan]

Lars Magne Ingebrigtsen <larsi@gnus.org> writes:

> Michael Welsh Duggan <md5i@cs.cmu.edu> writes:
> 
> > > > 4) After fetching, I end up with a `*' next to all my mail groups in
> > > >    the *Groups* buffer.  I can read them with
> > > >    `gnus-group-select-group' nonetheless, but this is rather annoying.
> > > 
> > > Hm.  I seem to be unable to reproduce this bug...
> > 
> > It is reproducible at my end.  If you can give me a good point to
> > trace from and tell me what function call to look for, I will find out
> > what is happening.
> 
> I think I've fixed this for 0.74.

Nope.  Afraid not.  I'll try to debug the problem.

-- 
Michael Duggan
(md5i@cs.cmu.edu)
.

Re: Pterodactyl Gnus v0.73 is released

[Michael Harnois]

Lars Magne Ingebrigtsen <larsi@gnus.org> writes:

> > OK, call me stupid, but I can't figure out what the right syntax is
> > for doing this in my .gnus (and customize bombs on mail-source.) Would 
> > someone send me the correct line in all its glorious entirety?
> 
> (setq nnmail-spool-file
>       '((directory :path "/where/the/promail/stuff/is/" :suffix "suffix")))

Well, we are making progress. Stuff is getting split into the correct
places. However, once it gets there, the nov database is not getting
updated. I have to run "nnml-generate-nov-databases" every time I want
to see new mail. This is rather cumbersome ...

Also, it appears to me that every .spool file is being scanned every
time I "g", even if it's zero length ...

-- 
Michael D. Harnois, Redeemer Lutheran Church, Washburn, IA 
mharnois@willinet.net                      aa0bt@aa0bt.ampr.org 
 There are three steps in the revelation of any truth: in the 
 first, it is ridiculed; in the second, resisted; in the 
 third, it is considered self-evident. -- Arthur Schopenhauer

Re: Pterodactyl Gnus v0.73 is released

[Michael Welsh Duggan]

Michael Welsh Duggan <md5i@cs.cmu.edu> writes:

> Lars Magne Ingebrigtsen <larsi@gnus.org> writes:
> 
> > Michael Welsh Duggan <md5i@cs.cmu.edu> writes:
> > 
> > > > > 4) After fetching, I end up with a `*' next to all my mail
> > > > >    groups in the *Groups* buffer.  I can read them with
> > > > >    `gnus-group-select-group' nonetheless, but this is rather
> > > > >    annoying.
> > > > 
> > > > Hm.  I seem to be unable to reproduce this bug...
> > > 
> > > It is reproducible at my end.  If you can give me a good point
> > > to trace from and tell me what function call to look for, I will
> > > find out what is happening.
> > 
> > I think I've fixed this for 0.74.
> 
> Nope.  Afraid not.  I'll try to debug the problem.

Found it!  The problem is that after calling `gnus-request-scan' in
`gnus-read-active-file' for a backend that is pulling out its mail via
pop, it is comming back with a different (current-buffer).  As such,
the subsequent `gnus-active-to-gnus-format' call gets nice and
confused.  I have temporarily fixed this at my end by putting a
`save-excursion' around the call to `gnus-request-scan', but I suspect
the problem ought to be solved at some lower level, perhaps
`nnmail-get-new-mail' or `mail-source-fetch'.

-- 
Michael Duggan
(md5i@cs.cmu.edu)
.

Re: Pterodactyl Gnus v0.73 is released

[Lars Magne Ingebrigtsen]

Michael Welsh Duggan <md5i@cs.cmu.edu> writes:

> Found it!  The problem is that after calling `gnus-request-scan' in
> `gnus-read-active-file' for a backend that is pulling out its mail via
> pop, it is comming back with a different (current-buffer). 

I've now slapped a `save-excursion' around `mail-source-fetch'.

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

Re: Pterodactyl Gnus v0.73 is released

[Lars Magne Ingebrigtsen]

Michael Harnois <mharnois@willinet.net> writes:

> Well, we are making progress. Stuff is getting split into the correct
> places. However, once it gets there, the nov database is not getting
> updated. I have to run "nnml-generate-nov-databases" every time I want
> to see new mail. This is rather cumbersome ...

Huh.  Could you check whether `nnml-save-nov' is evel called?

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

Re: Pterodactyl Gnus v0.73 is released

[Michael Harnois]

On 28 Jan 1999 08:22:08 +0100, Lars Magne Ingebrigtsen <larsi@gnus.org> said:

    > Huh.  Could you check whether `nnml-save-nov' is evel called?

Uhm ... err ... yes, if you tell me how ...

-- 
Michael D. Harnois, Redeemer Lutheran Church, Washburn, IA 
mharnois@willinet.net                      aa0bt@aa0bt.ampr.org 
 God made everything out of nothing, but the nothingness shows 
 through. -- Paul Valery 

Re: Pterodactyl Gnus v0.73 is released

[Hrvoje Niksic]

Michael Harnois <mharnois@willinet.net> writes:

> On 28 Jan 1999 08:22:08 +0100, Lars Magne Ingebrigtsen <larsi@gnus.org> said:
> 
>     > Huh.  Could you check whether `nnml-save-nov' is evel called?
> 
> Uhm ... err ... yes, if you tell me how ...

M-x debug-on-entry RET nnml-save-nov RET

Re: Pterodactyl Gnus v0.73 is released

[Hrvoje Niksic]

Lars Magne Ingebrigtsen <larsi@gnus.org> writes:

> Michael Welsh Duggan <md5i@cs.cmu.edu> writes:
> 
> > Found it!  The problem is that after calling `gnus-request-scan' in
> > `gnus-read-active-file' for a backend that is pulling out its mail via
> > pop, it is comming back with a different (current-buffer). 
> 
> I've now slapped a `save-excursion' around `mail-source-fetch'.

Note that you can use the more efficient `save-current-buffer', unless 
you also want to preserve the point and mark.

Re: Pterodactyl Gnus v0.73 is released

[Lars Magne Ingebrigtsen]

Hrvoje Niksic <hniksic@srce.hr> writes:

> Note that you can use the more efficient `save-current-buffer', unless 
> you also want to preserve the point and mark.

Hm.  Is that a new form?

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

Re: Pterodactyl Gnus v0.73 is released

[Hrvoje Niksic]

Lars Magne Ingebrigtsen <larsi@gnus.org> writes:

> Hrvoje Niksic <hniksic@srce.hr> writes:
> 
> > Note that you can use the more efficient `save-current-buffer',
> > unless you also want to preserve the point and mark.
> 
> Hm.  Is that a new form?

It is new as of FSF Emacs 20.0 and XEmacs 20.3.  So it's supported on
all the platforms Gnus supports.

Re: Pterodactyl Gnus v0.73 is released

[Michael Harnois]

On 28 Jan 1999 19:05:56 +0100, Hrvoje Niksic <hniksic@srce.hr> said:

    > Michael Harnois <mharnois@willinet.net> writes:
    >> On 28 Jan 1999 08:22:08 +0100, Lars Magne Ingebrigtsen
    >> <larsi@gnus.org> said:
    >>
    >> > Huh.  Could you check whether `nnml-save-nov' is evel called?
    >>
    >> Uhm ... err ... yes, if you tell me how ...

    > M-x debug-on-entry RET nnml-save-nov RET

Yup. 

* nnml-save-nov()
  nnmail-get-new-mail(nnml nnml-save-nov "/home/mharnois/Mail/" "deer")
  nnml-request-scan("deer" "private")
  gnus-request-scan("nnml+private:deer" (nnml "private"))
  gnus-activate-group("nnml+private:deer" scan)
  gnus-get-unread-articles(2)
  gnus-group-get-new-news(2)
  call-interactively(gnus-group-get-new-news)
  recursive-edit()
  byte-code("..." [pop-to-buffer debugger-buffer erase-buffer t 50 print-length print-escape-newlines standard-output backtrace debugger-mode re-search-forward "\n[* ] debug(" 1 debugger-reenable debugger-args (lambda debug) "Entering:\n" debug backtrace-debug 3 delete-char ?\* 0 exit "Return value: " debugger-value prin1 ?\n ?\  error "Signaling: " "Beginning evaluation of function call form:\n" nil message "" buffer-read-only inhibit-trace recursive-edit] 3)
  debug(debug)

-- 
Michael D. Harnois, Redeemer Lutheran Church, Washburn, IA 
mharnois@willinet.net                      aa0bt@aa0bt.ampr.org 
 God made everything out of nothing, but the nothingness shows 
 through. -- Paul Valery 

Re: Pterodactyl Gnus v0.73 is released

[Lars Magne Ingebrigtsen]

Michael Harnois <mharnois@willinet.net> writes:

>     > M-x debug-on-entry RET nnml-save-nov RET
> 
> Yup. 
> 
> * nnml-save-nov()

Hur.  And are the .overview files saved?

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

Re: Pterodactyl Gnus v0.73 is released

[Michael Harnois]

On 01 Feb 1999 22:02:34 +0100, Lars Magne Ingebrigtsen <larsi@gnus.org> said:

    > Michael Harnois <mharnois@willinet.net> writes:
    >> > M-x debug-on-entry RET nnml-save-nov RET
    >>
    >> Yup.
    >>
    >> * nnml-save-nov()

    > Hur.  And are the .overview files saved?

Yes.

There's one other bit of misbehavior. Fetching groups by level no
longer works (i.e. "1 g" no longer fetches just the groups on level
1.) This problem, AFAIK, infects nnml but not nnmh.

-- 
Michael D. Harnois, Redeemer Lutheran Church, Washburn, IA 
mharnois@willinet.net                      aa0bt@aa0bt.ampr.org 
 If Jesus came back today, and saw what was going on in his 
 name, he'd never stop throwing up. -- "Hannah and Her Sisters"

Re: Pterodactyl Gnus v0.73 is released

[Michael Harnois]

On 02 Feb 1999 08:35:49 -0600, Michael Harnois <mharnois@willinet.net> said:

    > There's one other bit of misbehavior. Fetching groups by level
    > no longer works (i.e. "1 g" no longer fetches just the groups on
    > level 1.) This problem, AFAIK, infects nnml but not nnmh.

Also, M-g to fetch the current group fetches more than just the
current group ...

-- 
Michael D. Harnois, Redeemer Lutheran Church, Washburn, IA 
mharnois@willinet.net                      aa0bt@aa0bt.ampr.org 
 If Jesus came back today, and saw what was going on in his 
 name, he'd never stop throwing up. -- "Hannah and Her Sisters"

Re: Pterodactyl Gnus v0.73 is released

[Lars Magne Ingebrigtsen]

Michael Harnois <mharnois@willinet.net> writes:

>     > Hur.  And are the .overview files saved?
> 
> Yes.

Are there anything different in the active file or the overview files
after you've regenerated them?  This is most puzzling.

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

Re: Pterodactyl Gnus v0.73 is released

[Michael Harnois]

On 02 Feb 1999 22:37:49 +0100, Lars Magne Ingebrigtsen <larsi@gnus.org> said:

    > Are there anything different in the active file or the overview
    > files after you've regenerated them?  This is most puzzling.

Humph. This is most odd. The active file has all sorts of duplicate
entries; and I tried moving it out of the way before generating, and
ended up with the same thing. It looks like this at the moment:

bbdb 441 29 y
gnome-list 10780 1 y
linux-kernel 37020 1252 y
liturgy 3598 3 y
0xdeadbeef 208 1 y
Ask_RIS 21 1 y
Pigs 182 7 y
Aquatic-Plants 3 3 y
Augsburg_Fortress 104 56 y
Bottom_Drawer 267 1 y
Bulletins 23 1 y
Called_To_Common_Mission_Discuss 241 2 y
Chitchat 85 21 y
Coffeeschmoozing 773 42 y
Computer_Humor 70 1 y
Concordat_Humor 17 1 y
Crossroads_Christianity 39 1 y
Discipline_Of_Pastor_Sabin 21 1 y
ELCA_Metro_NY_Synod 55 1 y
ELCA_News_Full 172 1 y
ELCA_News_Sightings 52 1 y
ELCA_SE_Iowa_Synod_Link 90 1 y
ELCA_Worship_Staff 204 1 y
ENI_Summary 122 1 y
Ecucoffeebreak 38 1 y
Eculaugh 512 1 y
Ecumenical_Lutheranism 1732 938 y
Ecunet_Help 132 1 y
Epistle_Notes_For_Next_Sunday 14 11 y
Funstuff 226 1 y
Gay_Lutherans 53 1 y
Gay_Lutherans_Private 40 1 y
Girard_HTM 207 201 y
Gospel_Notes_For_Next_Sunday 784 375 y
Grody_To_The_Max 1297 213 y
Illustrations_For_This_Week 103 24 y
Jokes 1144 1 y
LPRng 400 400 y
Lutheran_Life_Changes 610 1 y
NWWI_Linkline 169 5 y
New_England_Town_Meeting 673 38 y
News_Of_The_Weird 58 1 y
Oxymorons 35 1 y
Preaching_Stewardship 152 148 y
Presbyterian_Episcopal_Dialogue 7 1 y
Sabbatheology 44 5 y
Sermonshop_1998_12_20 100 1 y
bug-glibc 210 1 y
debian-user 24384 207 y
egcs 8781 1 y
egcs-bugs 5657 1 y
inbox 11930 105 y
deer 81 1 y
Sermonshop_Sermons 484 280 y
Table_Talk 3716 1 y
Tax_Issues_Affecting_The_Clergy 278 1 y
Wanted_And_For_The_Asking 447 1 y
apisto 60 1 y
cichlid-list 555 121 y
debian-changes 370 1 y
debian-mentors 1224 1 y
ding 4812 60 y
flexfax 2290 56 y
gnu-win32 6126 5826 y
gtk-list 2900 1 y
humor 268 1 y
libc-alpha 1008 573 y
linux-c-programming 1336 1 y
mc 695 78 y
mc-devel 492 61 y
mico-announce 10 2 y
mico-devel 586 35 y
mico-support 4 2 y
mime-info 80 74 y
netsig 182 1 y
nos-bbs 245 245 y
parport 1247 159 y
procmail 1018 2 y
propertalk 3078 67 y
qt 465 465 y
relhumor 5355 6 y
tm 201 19 y
tnos-topics 838 99 y
toyota-mods 8645 84 y
windowmaker 10029 3 y
PIGS 1 1 y
xemacs-announce 14 8 y
xemacs-beta 5698 1 y
xemacs-mule 89 8 y
xemacs-nt 1818 1 y
ladyhawke 274 1 y
ELCA_Synod_Assemblies 16 15 y
EDEO_Chat 6 1 y
RCA_General_Synod_1998 1 1 y
tnos-support 1 1 y
Internet_Research_Project 6 1 y
Sven_And_Ole_Yokes 12 8 y
ELCA_Elections 6 6 y
Dysthymics_Online 611 57 y
Sermonshop_1998_12_24_and_25 1 1 y
mail.misc 54 1 y
CTP 148 9 y
New_Ecunet 620 1 y
Bethlehem_Of_Pa 1701 3 y
Evangelizing_To_Gays 4 1 y
Sermonshop_1998_12_27 34 1 y
alsa-devel 891 1 y
Justification 4 1 y
spamfolder 739 1 y
Sermonshop_1999_01_10 64 1 y
Ethical_Dilemmas_Anonymous 1 1 y
Confessing_Christ 237 2 y
Sermonshop_1999_01_17 127 1 y
video4linux 1286 881 y
qmail 1069 31 y
Sermonshop_1999_01_24 65 1 y
Sierra_Pacific_Connection 28 14 y
Alternate_Lenten_Preaching 16 7 y
lyx 2965 867 y
Sermonshop_1999_01_31 86 1 y
draft 2 1 y
sbt 116 20 y
Feedback 78 71 y
Confirmation_Ministry 39 38 y
Concordat 4 1 y
Sermonshop_Discussion 946 348 y
lection-list 644 338 y
Sermonshop_1998_11_22 40 4 y
alsa-user 789 692 y
Sermonshop_1998_11_15 57 4 y
Sermonshop_1999_02_07 8 1 y
Sermonshop_1998_12_13 50 3 y
Sermonshop_1998_11_29 71 3 y
Bottomless_Drawer 43 1 y
Candid_Conversations_About_Sex 115 4 y
nil 44 1 y
+inbox 11812 105 y
Confessing_Christ. 237 2 y
Ecunet_Help. 132 1 y
spamfolder. 739 1 y
Called_To_Common_Mission_Discuss. 241 2 y
Sabbatheology. 44 5 y
Preaching_Stewardship. 152 147 y
xemacs-nt. 1818 1 y
Wanted_And_For_The_Asking. 447 1 y
mc. 691 78 y
xemacs-beta. 5698 1 y
windowmaker. 10029 3 y
video4linux. 1286 881 y
toyota-mods. 8645 84 y
tnos-topics. 838 99 y
tm. 200 19 y
relhumor. 5355 6 y
qmail. 1069 31 y
propertalk. 3078 67 y
parport. 1247 159 y
lyx. 2965 867 y
liturgy. 3598 3 y
linux-kernel. 37020 1252 y
libc-alpha. 1008 573 y
lection-list. 644 338 y
inbox. 11930 105 y
gnu-win32. 6126 5528 y
gnome-list. 10780 1 y
flexfax. 2290 56 y
egcs. 8781 1 y
egcs-bugs. 5657 1 y
ding. 4812 46 y
debian-user. 24384 207 y
debian-mentors. 1224 1 y
bbdb. 441 29 y
alsa-user. 789 654 y
alsa-devel. 891 1 y
Tax_Issues_Affecting_The_Clergy. 274 1 y
Table_Talk. 3716 1 y
Sermonshop_Discussion. 946 348 y
Sermonshop_1999_01_31. 78 1 y
New_England_Town_Meeting. 673 38 y
New_Ecunet. 620 1 y
NWWI_Linkline. 169 5 y
Jokes. 1144 1 y
Eculaugh. 512 1 y
ELCA_News_Sightings. 52 1 y
ELCA_Metro_NY_Synod. 53 1 y
Bottom_Drawer. 267 1 y
Bethlehem_Of_Pa. 1701 3 y
0xdeadbeef. 205 1 y
Augsburg_Fortress. 104 56 y
Bottomless_Drawer. 43 1 y
ENI_Summary. 122 1 y
Funstuff. 225 1 y
Gospel_Notes_For_Next_Sunday. 784 375 y
Lutheran_Life_Changes. 604 1 y
Epistle_Notes_For_Next_Sunday. 14 11 y
Alternate_Lenten_Preaching. 15 1 y
Candid_Conversations_About_Sex. 115 4 y
Coffeeschmoozing. 773 42 y
Feedback. 78 68 y
Grody_To_The_Max. 1297 213 y
Sierra_Pacific_Connection. 24 7 y
deer. 78 1 y
humor. 265 1 y
mc-devel. 487 61 y
Sermonshop_1999_02_07. 8 1 y
ELCA_News_Full. 172 1 y
Girard_HTM. 205 201 y
Sermonshop_Sermons. 480 297 y
Sven_And_Ole_Yokes. 12 8 y
debian-changes. 363 1 y
backup 0 1 y
procmail. 1018 2 y


-- 
Michael D. Harnois, Redeemer Lutheran Church, Washburn, IA 
mharnois@willinet.net                      aa0bt@aa0bt.ampr.org 
 If Jesus came back today, and saw what was going on in his 
 name, he'd never stop throwing up. -- "Hannah and Her Sisters"

Re: Pterodactyl Gnus v0.73 is released

[Lars Magne Ingebrigtsen]

Michael Harnois <mharnois@willinet.net> writes:

> Humph. This is most odd. The active file has all sorts of duplicate
> entries; and I tried moving it out of the way before generating, and
> ended up with the same thing. It looks like this at the moment:

Does nnml-group-alist contain the doubled groups?

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

Re: Pterodactyl Gnus v0.73 is released

[Michael Harnois]

On 03 Feb 1999 02:29:26 +0100, Lars Magne Ingebrigtsen <larsi@gnus.org> said:

    > Does nnml-group-alist contain the doubled groups?

It does indeed.

-- 
Michael D. Harnois, Redeemer Lutheran Church, Washburn, IA 
mharnois@willinet.net                      aa0bt@aa0bt.ampr.org 
 If Jesus came back today, and saw what was going on in his 
 name, he'd never stop throwing up. -- "Hannah and Her Sisters"

Re: Pterodactyl Gnus v0.73 is released

[Lars Magne Ingebrigtsen]

Michael Harnois <mharnois@willinet.net> writes:

>     > Does nnml-group-alist contain the doubled groups?
> 
> It does indeed.

Hur.

Could you edebug through `nnml-active-number' and see whether that
adds doubled entries to the alist?

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

Re: Pterodactyl Gnus v0.73 is released

[Michael Harnois]

On 03 Feb 1999 16:06:29 +0100, Lars Magne Ingebrigtsen <larsi@gnus.org> said:

    > Michael Harnois <mharnois@willinet.net> writes:
    >> > Does nnml-group-alist contain the doubled groups?
    >>
    >> It does indeed.

    > Hur.

    > Could you edebug through `nnml-active-number' and see whether
    > that adds doubled entries to the alist?

Found the problem:

2c2
< 	'((directory :path "~/Mail/spool" :suffix "spool")))
---
> 	'((directory :path "~/Mail/spool" :suffix ".spool")))

-- 
Michael D. Harnois, Redeemer Lutheran Church, Washburn, IA 
mharnois@willinet.net                      aa0bt@aa0bt.ampr.org 
 No excellent soul is exempt from a mixture of madness.
                -- Aristotle