Re: IMAP Questions

[Simon Josefsson <jas@pdc.kth.se>]

Johan Parin <Johan.Parin@abc.se> writes:

>   >> (gnus-demon-add-handler 'gnus-demon-scan-mail 2 nil)
...
> You're right. Tried it at home, where I'm using pop, and it's the same 
> problem. I hope I'm not misunderstanding something - I mean
> gnus-demon-scan-mail _is_ supposed to fetch new mail, right?

Perhaps `gnus-demon-scan-news' is what you want?  By the look of the
code, `g-d-s-mail' only scan (ie perform splitting), and `g-d-s-news'
does the same but also update the group buffer.

> Anyway, I did some more debugging and what happens is that when
> nnmail-get-new-mail is called from the demon, nnmail-fetched-sources
> is nil. This means that the 'when fetching-sources' form where the
> mail is actually fetched will not be run. 

This might work.

2000-06-07  Simon Josefsson  <jas@pdc.kth.se>

	* gnus-demon.el (gnus-demon-scan-mail): Bind
	nnmail-fetched-sources.

Index: gnus-demon.el
===================================================================
RCS file: /usr/local/cvsroot/gnus/lisp/gnus-demon.el,v
retrieving revision 5.9
diff -w -u -u -w -r5.9 gnus-demon.el
--- gnus-demon.el	1999/12/04 02:29:32	5.9
+++ gnus-demon.el	2000/06/06 00:16:18
@@ -272,6 +272,9 @@
 (defun gnus-demon-scan-mail ()
   (save-window-excursion
     (let ((servers gnus-opened-servers)
+          ;; Binding this variable will inhibit multiple fetchings
+          ;; of the same mail source.
+          (nnmail-fetched-sources (list t))
 	  server)
       (while (setq server (car (pop servers)))
 	(and (gnus-check-backend-function 'request-scan (car server))