[Emacs-diffs] /srv/bzr/emacs/trunk r109191: nnir.el ("nnir"): Add 'virtual ability to nnir backend

[Katsumi Yamaoka]

------------------------------------------------------------
revno: 109191
author: Andrew Cohen <address@hidden>
committer: Katsumi Yamaoka <address@hidden>
branch nick: trunk
timestamp: Mon 2012-07-23 11:10:23 +0000
message:
  nnir.el ("nnir"): Add 'virtual ability to nnir backend
modified:
  lisp/gnus/ChangeLog
  lisp/gnus/nnir.el

=== modified file 'lisp/gnus/ChangeLog'
--- a/lisp/gnus/ChangeLog       2012-07-21 11:05:32 +0000
+++ b/lisp/gnus/ChangeLog       2012-07-23 11:10:23 +0000
@@ -1,3 +1,7 @@
+2012-07-22  Andrew Cohen  <address@hidden>
+
+       * nnir.el ("nnir"): Add 'virtual ability to nnir backend.
+
 2012-07-21  Julien Danjou  <address@hidden>
 
        * message.el (message-dont-reply-to-names): Replace deprecated

=== modified file 'lisp/gnus/nnir.el'
--- a/lisp/gnus/nnir.el 2012-02-11 22:13:29 +0000
+++ b/lisp/gnus/nnir.el 2012-07-23 11:10:23 +0000
@@ -288,7 +288,7 @@
 (eval-when-compile
   (autoload 'nnimap-buffer "nnimap")
   (autoload 'nnimap-command "nnimap")
-  (autoload 'nnimap-possibly-change-group "nnimap")
+  (autoload 'nnimap-change-group "nnimap")
   (autoload 'nnimap-make-thread-query "nnimap")
   (autoload 'gnus-registry-action "gnus-registry"))
 
@@ -298,7 +298,7 @@
 (defvoo nnir-address nil
   "The address of the nnir server.")
 
-(gnus-declare-backend "nnir" 'mail)
+(gnus-declare-backend "nnir" 'mail 'virtual)
 
 
 ;;; User Customizable Variables:
@@ -854,7 +854,7 @@
          (lambda (group)
            (let (artlist)
              (condition-case ()
-                 (when (nnimap-possibly-change-group
+                 (when (nnimap-change-group
                         (gnus-group-short-name group) server)
                    (with-current-buffer (nnimap-buffer)
                      (message "Searching %s..." group)