Allow nnir as a gnus-refer-article-method.

[gnus] / lisp / nnregistry.el

diff --git a/lisp/nnregistry.el b/lisp/nnregistry.el
index b2d8050..359050c 100644 (file)
--- a/lisp/nnregistry.el
+++ b/lisp/nnregistry.el
@@ -1,7 +1,7 @@
 ;;; nnregistry.el --- access to articles via Gnus' message-id registry
 ;;; -*- coding: utf-8 -*-
 
-;; Copyright (C) 2010 Free Software Foundation, Inc.
+;; Copyright (C) 2010-2011 Free Software Foundation, Inc.
 
 ;; Authors: Ludovic Courtès <ludo@gnu.org>
 ;; Keywords: news, mail
@@ -25,7 +25,8 @@
 
 ;; This file provides the `nnregistry' Gnus back-end.  It can be used
 ;; in `gnus-refer-article-method' to quickly search for a message by
-;; id, regardless of the back-end that stores it.
+;; id, regardless of the back-end that stores it.  See the Gnus manual
+;; for usage examples and more information.
 
 ;;; Code:
 
@@ -52,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)