Merge from emacs-23; up to 2010-06-12T10:58:54Z!romain@orebokech.com.

[bpt/emacs.git] / lisp / gnus / nnregistry.el

diff --git a/lisp/gnus/nnregistry.el b/lisp/gnus/nnregistry.el
index 947ba4b..359050c 100644 (file)
--- a/lisp/gnus/nnregistry.el
+++ b/lisp/gnus/nnregistry.el
@@ -53,7 +53,7 @@
 (deffoo nnregistry-request-article (id &optional group server buffer)
   (and (not nnregistry-within-nnregistry)
        (let* ((nnregistry-within-nnregistry t)
-             (group (gnus-registry-fetch-group id))
+             (group (nth 0 (gnus-registry-get-id-key id 'group)))
              (gnus-override-method nil))
         (message "nnregistry: requesting article `%s' in group `%s'"
                  id group)