* gnus-agent.el (gnus-agent-load-local): Recompute gnus-agent-article-local on changi...

This prevents gnus-agent-save-local from saving a stale symbol-value
corresponding to some homonymous group (belonging to a different
method).

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 2168503..5ef15d2 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2012-01-04  Wolfgang Jenkner  <wjenkner@inode.at>
+
+       * gnus-agent.el (gnus-agent-load-local): Recompute
+       gnus-agent-article-local on changing method.
+
 2012-01-04  Lars Magne Ingebrigtsen  <larsi@gnus.org>
 
        * gnus.el (gnus-parameters): Note precedence.

diff --git a/lisp/gnus-agent.el b/lisp/gnus-agent.el
index d268dd7..56ba6a9 100644 (file)
--- a/lisp/gnus-agent.el
+++ b/lisp/gnus-agent.el
@@ -2229,7 +2229,10 @@ doesn't exist, to valid the overview buffer."
 article counts for each of the method's subscribed groups."
   (let ((gnus-command-method (or method gnus-command-method)))
     (when (or (null gnus-agent-article-local-times)
-             (zerop gnus-agent-article-local-times))
+             (zerop gnus-agent-article-local-times)
+             (not (gnus-methods-equal-p
+                   gnus-command-method
+                   (symbol-value (intern "+method" gnus-agent-article-local)))))
       (setq gnus-agent-article-local
            (gnus-cache-file-contents
             (gnus-agent-lib-file "local")