Gnus fails to notice (some) new IMAP messages

Gnus fails to notice (some) new IMAP messages

[Ross A. Laird]

I have a weird problem in gnus: only some of my new emails show up, and
every once in a while (every day or so, upon restarting), gnus shows me
"new" old messages from months ago. Perhaps the latter problem is
related to the fact that I used gnus for a while, stopped using it, and
am now returning to it.

Gnus seems to notice most new mails (about 80%), but that's not good at
all in the greater scheme of things. The IMAP server is on a Linux box
running courier (Dreamhost). Also, I use mutt and Thunderbird as well. I
am using emacs-snapshot-gtk 23.0.0.1, with gnus 0.6.

Anyway, here's my .gnus, if it helps:

(load-library "message")
(setq mail-sources
      '(imap 
	 :server "mail.server.com" 
	 :user "me" 
	 :password "password"))
(setq gnus-select-method
      '(nnimap "mail-imap"
	       (nnimap-address "mail.server.com")))
(setq nnimap-list-pattern "INBOX")
(setq gnus-secondary-select-methods
      '(
	(nnimap "mail-imap"
		(nnimap-address "mail.server.com")
		(nnimap-server-port 993)
		(nnimap-stream ssl)
		(nnimap-authenticator login)
		(nnimap-nov-is-evil t)
		(nnir-search-engine imap)
		(remove-prefix "INBOX.")
		(nnimap-authinfo-file		
		 "...authinfo"
		 ))))
(setq gnus-group-sort-by-server)
(setq smtpmail-smtp-server "mail.server.me")
(setq user-mail-address "ross@rosslaird.info")
(setq message-send-mail-real-function 'smtpmail-send-it)
(setq mm-text-html-renderer 'w3m-standalone)
(setq mm-discouraged-alternatives '("text/html" "text/richtext"))
(setq gnus-message-archive-group "nnimap+rosslaird:INBOX.Sent")
(setq gnus-outgoing-message--group "nnimap+rosslaird:INBOX.Sent")
(setq nnimap-need-unselect-to-notice-new-mail t)
(setq message-kill-buffer-on-exit t)
(add-hook 'message-mode-hook 'turn-on-auto-fill)
(setq gnus-summary-line-format "%U%R%z %d %I%(%[%4L: %-23,23f%]%) %s\n")
(setq gnus-directory "~/gnus")
(setq message-directory "~/gnus/mail")
(setq nnml-directory "~/gnus/nnml-mail")
(setq gnus-article-save-directory "~/gnus/saved")
(setq gnus-kill-files-directory "~/gnus/scores")
(setq gnus-cache-directory "~/gnus/cache")
(add-hook 'gnus-startup-hook 'bbdb-insinuate-gnus)
(add-hook 'dired-mode-hook 'turn-on-gnus-dired-mode)
; Keep all mail!
(setq nnmail-expiry-wait 2)
(remove-hook 'gnus-mark-article-hook 
             'gnus-summary-mark-read-and-unread-as-read)
(add-hook 'gnus-mark-article-hook 
          'gnus-summary-mark-unread-as-read)
; Group formatting
(setq gnus-group-line-format "%M%S%5y/%-5t: %uG %D\n")
(defun gnus-user-format-function-G (arg)
  (concat (car (cdr gnus-tmp-method)) ":"
          (or (gnus-group-find-parameter gnus-tmp-group 'display-name)
           (let ((prefix (assq 'remove-prefix (cddr gnus-tmp-method))))
             (if (and prefix
                 (string-match (concat "^\\("
                   (regexp-quote (cadr prefix))
                                       "\\)")
                                 gnus-tmp-qualified-group))
            (substring gnus-tmp-qualified-group (match-end 1))
                  gnus-tmp-qualified-group)))))
; SSL
(setq imap-ssl-program "openssl s_client -quiet -ssl3 -connect %s:%p")

(require 'gnus-demon)
(setq gnus-use-demon t)
(gnus-demon-add-handler 'gnus-group-get-new-news 10 2)
(gnus-demon-init)

--

Anything look obviously wrong here?

Ross
-- 
Ross A. Laird, PhD
www.rosslaird.info