(gnus-group-make-nnir-group): Put a message-unique-id into names of

ephemeral groups to avoid gnus-backlog related caching problems on
repeated searches.

diff --git a/contrib/ChangeLog b/contrib/ChangeLog
index 45bde96..92b5e55 100644 (file)
--- a/contrib/ChangeLog
+++ b/contrib/ChangeLog
@@ -1,3 +1,9 @@
+2007-03-26  Andreas Seltenreich  <uwi7@rz.uni-karlsruhe.de>
+
+       * nnir.el (gnus-group-make-nnir-group): Put a message-unique-id into
+       names of ephemeral groups to avoid gnus-backlog related caching
+       problems on repeated searches.
+
 2007-03-24  Reiner Steib  <Reiner.Steib@gmx.de>
 
        * smtpmail.el: Signal an error when used with Emacs 22+ or XEmacs.

diff --git a/contrib/nnir.el b/contrib/nnir.el
index 1f270b7..0c06cb7 100644 (file)
--- a/contrib/nnir.el
+++ b/contrib/nnir.el
@@ -294,6 +294,7 @@
 (require 'nnoo)
 (require 'gnus-group)
 (require 'gnus-sum)
+(require 'message)
 (eval-and-compile
   (require 'gnus-util))
 (eval-when-compile
@@ -610,6 +611,7 @@ that it is for Namazu, not Wais."
     (if extra-parms
         (setq parms (nnir-read-parms query))
       (setq parms (list (cons 'query query))))
+    (add-to-list 'parms (cons 'unique-id (message-unique-id)) t)
     (gnus-group-read-ephemeral-group
      (concat "nnir:" (prin1-to-string parms)) '(nnir "") t
      (cons (current-buffer)