Upgrading Gnus to 5.2.1, losing some nnml groups

[David Allen <davida%lsls4e@ifi.uio.no>]

Previous problem fixed (thanks Lars): imported package which I still
have in my .emacs but don't use redefined match-string.

Again, upgrading from sgnus-0.45 to gnus 5.2.1, XEmacs 19.13.

My nnml groups appear to be dead until new mail is received so I can't
go back to read old messages.  The number of messages in the group is
'*' and attempting to select the group gives the trace below.  My mail
setup (ignoring spli methods is:

(defun dja-gnus-summary-exit ()
  (if (string-match "^nndoc" gnus-newsgroup-name)
      (progn
	(beginning-of-buffer)
	(while (not (eobp))
	  (gnus-summary-mark-article-as-read gnus-unread-mark)
	  (gnus-summary-mark-article-as-unread gnus-unread-mark)
	  (forward-line 1)))))
(add-hook 'gnus-summary-prepare-exit-hook 'dja-gnus-summary-exit)
       
(setq nnmail-crash-box "/usr/workspace/gnus/.gnus-crash-box")
(setq nnmail-tmp-directory "/usr/workspace/gnus")
(setq nnml-directory "/usr/workspace/gnus")
(setq nnmail-use-long-file-names nil)
(setq nnmail-crosspost nil)
(setq nnml-get-new-mail t)
(setq gnus-auto-expirable-newsgroups
      (concat "mail.fvwm\\|"
	      "mail.gnus\\|"
	      "mail.sf-written\\|"
	      "mail.sf-tv\\|"
	      "mail.sf-lovers\\|"
	      "mail.cron\\|"
	      "mail.junk\\|"
	      "mail.daemon\\|"
	      "mail.latex2html"))

(setq gnus-secondary-select-methods '((nnml "")))

Also, getting new news seems to be significantly slower.  Are nndoc
groups scanned when getting new news?

Trace from attempting to select an nnml group:

Signalling: (error "Couldn't request group nnml:mail.david: No such group: mail.david")
  signal(error ("Couldn't request group nnml:mail.david: No such group: mail.david"))
  cerror("Couldn't request group %s: %s" "nnml:mail.david" "No such group: mail.david")
  apply(cerror ("Couldn't request group %s: %s" "nnml:mail.david" "No such group: mail.david"))
  error("Couldn't request group %s: %s" "nnml:mail.david" "No such group: mail.david")
  (progn (when (equal major-mode ...) (kill-buffer ...)) (error "Couldn't request group %s: %s" group (gnus-status-message group))))
  (or (and entry (not ...)) (gnus-activate-group group) (progn (when ... ...) (error "Couldn't request group %s: %s" group ...))))
  (let* ((entry ...) (info ...) articles fetched-articles cached) (or (gnus-check-server ...) (error "Couldn't open server")) (or (and entry ...) (gnus-activate-group group) (progn ... ...)) (unless (gnus-request-group group t) (when ... ...) (error "Couldn't request group %s: %s" group ...)) (setq gnus-newsgroup-name group) (setq gnus-newsgroup-unselected nil) (setq gnus-newsgroup-unreads (gnus-list-of-unread-articles group)) (and gnus-asynchronous (gnus-check-backend-function ... gnus-newsgroup-name) (setq gnus-newsgroup-async ...)) (when info (gnus-adjust-marked-articles info)) (when (gnus-virtual-group-p group) (setq cached gnus-newsgroup-cached)) (setq gnus-newsgroup-unreads (gnus-set-difference ... gnus-newsgroup-dormant)) (setq gnus-newsgroup-processable nil) (setq articles (gnus-articles-to-read group read-all)) (cond (... ...) (... nil) (t ... ... ... ... ... ... ... ... ... ... ... ... ... ...))))
  gnus-select-newsgroup("nnml:mail.david" nil)
  (and new-group (gnus-select-newsgroup group show-all)))
  (let* ((new-group ...) (quit-config ...) (did-select ...)) (cond (... ... ... ... ... ... ... t) (... ... ... nil) (... ... ... ... ...) (t ... ... ... ... ... ... ... ... ... ... ... ... ... ... t))))
  gnus-summary-read-group("nnml:mail.david" nil nil)
  (let ((group ...) number active marked entry) (or group (error "No group on current line")) (setq marked (nth 3 ...)) (setq number (cond ... ... ...)) (gnus-summary-read-group group (or all ...) no-article)))
  gnus-group-read-group(nil nil nil)
  (if (gnus-group-topic-p) (let (...) (gnus-topic-fold all)) (gnus-group-read-group all no-article group)))
  gnus-topic-read-group(nil)
  gnus-mouse-pick-topic(#<buttondown-event button2>)
  call-interactively(gnus-mouse-pick-topic)

Thanks,

David
--
David Allen (davida@lsl.co.uk)		   Laser-Scan Ltd, 
Principal Software Engineer		   Science Park, Milton Road
Tel: 01223 420414   Fax: 01223 420044      Cambridge, CB4 4FY, UK