diff options
| author | Katsumi Yamaoka <yamaoka@jpl.org> | 2010-09-14 03:40:10 +0000 |
|---|---|---|
| committer | Katsumi Yamaoka <yamaoka@jpl.org> | 2010-09-14 03:40:10 +0000 |
| commit | dff99050cfa74a2c7999002d25d2ce48b7a93749 (patch) | |
| tree | 395245e49c051b675892bd7900c98bb6d1cfc7b4 | |
| parent | 26632d8d412f5cdd2034e125eafb38a9a6b99c2d (diff) | |
| download | emacs-dff99050cfa74a2c7999002d25d2ce48b7a93749.tar.gz | |
gnus-start.el (gnus-read-active-for-groups): Run gnus-activate-group for back end that doesn't support request-scan.
| -rw-r--r-- | lisp/gnus/ChangeLog | 5 | ||||
| -rw-r--r-- | lisp/gnus/gnus-start.el | 4 |
2 files changed, 7 insertions, 2 deletions
diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog index 7dca7730828..ee9700c2421 100644 --- a/lisp/gnus/ChangeLog +++ b/lisp/gnus/ChangeLog @@ -1,3 +1,8 @@ +2010-09-14 Katsumi Yamaoka <yamaoka@jpl.org> + + * gnus-start.el (gnus-read-active-for-groups): Run gnus-activate-group + for back end that doesn't support request-scan. + 2010-09-10 Lars Magne Ingebrigtsen <larsi@gnus.org> * gnus-start.el (gnus-read-active-file-1): If gnus-agent isn't set, diff --git a/lisp/gnus/gnus-start.el b/lisp/gnus/gnus-start.el index 1c06a774203..f205ab6b59e 100644 --- a/lisp/gnus/gnus-start.el +++ b/lisp/gnus/gnus-start.el @@ -1808,11 +1808,11 @@ If SCAN, request a scan of that group as well." (dolist (info infos (nreverse groups)) (push (gnus-group-real-name (gnus-info-group info)) groups)) method))) - ((gnus-check-backend-function 'request-list (car method)) + ((gnus-check-backend-function 'request-scan (car method)) (gnus-read-active-file-1 method nil infos)) (t (dolist (info infos) - (gnus-activate-group (gnus-info-group info) nil nil method t)))))) + (gnus-activate-group (gnus-info-group info) nil nil method)))))) ;; Create a hash table out of the newsrc alist. The `car's of the ;; alist elements are used as keys. |