2010-09-04 Lars Magne Ingebrigtsen <larsi@gnus.org>
+ * gnus-start.el (gnus-get-unread-articles): Protect against groups that
+ come from no known methods.
+
* pop3.el (pop3-display-message-size-flag): Removed -- everybody wants
message sizes.
(pop3-movemail): Use erase-buffer instead of looping and deleting
infos (nth 2 (car type-cache)))
(pop type-cache)
- ;; See if any of the groups from this method require updating.
- (when (block nil
- (dolist (info infos)
- (when (<= (gnus-info-level info)
- (if (eq method-type 'foreign)
- foreign-level
- alevel))
- (return t))))
- (gnus-read-active-for-groups method infos)
- (dolist (info infos)
- (inline (gnus-get-unread-articles-in-group
- info (gnus-active (gnus-info-group info)))))))
+ (when method
+ ;; See if any of the groups from this method require updating.
+ (when (block nil
+ (dolist (info infos)
+ (when (<= (gnus-info-level info)
+ (if (eq method-type 'foreign)
+ foreign-level
+ alevel))
+ (return t))))
+ (gnus-read-active-for-groups method infos)
+ (dolist (info infos)
+ (inline (gnus-get-unread-articles-in-group
+ info (gnus-active (gnus-info-group info))))))))
(gnus-message 6 "Checking new news...done")))
(defun gnus-method-rank (type method)