From d65835d93bc0edc28e30e6cbd16c93bb239d9573 Mon Sep 17 00:00:00 2001 From: Lars Magne Ingebrigtsen Date: Sun, 5 Sep 2010 23:13:43 +0000 Subject: [PATCH] gnus-start.el (gnus-method-rank): Get info for virtual groups last. --- lisp/gnus/ChangeLog | 4 ++++ lisp/gnus/gnus-start.el | 3 +++ 2 files changed, 7 insertions(+) diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog index 7884a3e5c0d..792a043ba62 100644 --- a/lisp/gnus/ChangeLog +++ b/lisp/gnus/ChangeLog @@ -1,3 +1,7 @@ +2010-09-05 Lars Magne Ingebrigtsen + + * gnus-start.el (gnus-method-rank): Get info for virtual groups last. + 2010-09-05 Katsumi Yamaoka * gnus-start.el (gnus-method-rank): Replace equalp with equal. diff --git a/lisp/gnus/gnus-start.el b/lisp/gnus/gnus-start.el index 9325ddd2a23..9a923ff4d32 100644 --- a/lisp/gnus/gnus-start.el +++ b/lisp/gnus/gnus-start.el @@ -1764,6 +1764,9 @@ If SCAN, request a scan of that group as well." (defun gnus-method-rank (type method) (cond + ;; Get info for virtual groups last. + ((eq (car method) 'nnvirtual) + 200) ((eq type 'primary) 1) ;; Compute the rank of the secondary methods based on where they -- 2.39.2