* nnir.el (nnir-search-thread): Position point on referring article line.

* nnimap.el (nnimap-request-thread): Whitespace fix.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index ab99dbc..67f6b47 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,10 @@
+2011-08-02  Andrew Cohen  <cohen@andy.bu.edu>
+
+       * nnir.el (nnir-search-thread): Position point on referring article
+       line.
+
+       * nnimap.el (nnimap-request-thread): Whitespace fix.
+
 2011-08-02  Steve Purcell  <steve@sanityinc.com>  (tiny change)
 
        * nnimap.el (nnimap-get-groups): Decode "&" correctly.

diff --git a/lisp/nnimap.el b/lisp/nnimap.el
index 1fd0840..f41f4af 100644 (file)
--- a/lisp/nnimap.el
+++ b/lisp/nnimap.el
@@ -1566,7 +1566,7 @@ textual parts.")
                  (articles &optional limit force-new dependencies))
 
 (deffoo nnimap-request-thread (header &optional group server)
-  (if gnus-refer-thread-use-nnir 
+  (if gnus-refer-thread-use-nnir
       (nnir-search-thread header)
     (when (nnimap-possibly-change-group group server)
       (let* ((cmd (nnimap-make-thread-query header))

diff --git a/lisp/nnir.el b/lisp/nnir.el
index e6420a4..5f0a2c6 100644 (file)
--- a/lisp/nnir.el
+++ b/lisp/nnir.el
@@ -1659,7 +1659,8 @@ server is of form 'backend:name'."
               (cons 'server (gnus-method-to-server
                              (gnus-find-method-for-group
                               gnus-newsgroup-name))))))
-    (gnus-group-make-nnir-group nil parm)))
+    (gnus-group-make-nnir-group nil parm)
+    (gnus-summary-goto-subject (gnus-id-to-article (mail-header-id header)))))
 
 ;; unused?
 (defun nnir-artlist-groups (artlist)