mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00
Code Issues Projects Releases Wiki Activity

nnir.el ("nnir"): Add 'virtual ability to nnir backend

Browse source
This commit is contained in:
Andrew Cohen 2012-07-23 11:10:23 +00:00 • committed by Katsumi Yamaoka
parent 372f8ffc2e
commit 5df1607869
2 changed files with 7 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

4
lisp/gnus/ChangeLog
View file

@ -1,3 +1,7 @@
2012-07-22 Andrew Cohen <cohen@bu.edu>
* nnir.el ("nnir"): Add 'virtual ability to nnir backend.
2012-07-21 Julien Danjou <julien@danjou.info>
* message.el (message-dont-reply-to-names): Replace deprecated

6
lisp/gnus/nnir.el
View file

@ -288,7 +288,7 @@ is `(valuefunc member)'."
(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 @@ is `(valuefunc member)'."
(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 @@ details on the language and supported extensions."
(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)