gnus-start.el (gnus-method-rank): Get info for virtual groups last.

diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog
index 7884a3e..792a043 100644 (file)
--- a/lisp/gnus/ChangeLog
+++ b/lisp/gnus/ChangeLog
@@ -1,3 +1,7 @@
+2010-09-05  Lars Magne Ingebrigtsen  <larsi@gnus.org>
+
+       * gnus-start.el (gnus-method-rank): Get info for virtual groups last.
+
 2010-09-05  Katsumi Yamaoka  <yamaoka@jpl.org>
 
        * 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 9325ddd..9a923ff 100644 (file)
--- 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