[gnus git] branch master updated: m0-13-57-gb9d4597 =1= * gnus-sum.el (gnus-summary-search-article): Ensure that the article where the search word is found is displayed and pointed to in the summary buffer.

Katsumi Yamaoka <[email protected]> Tue, 01 Sep 2015 08:16:23 +0200
Newsgroups gmane.emacs.gnus.cvs
Message-ID <[email protected]>
       via  b9d4597a71a404851e3180b476ffe6186131adac (commit)
      from  f581141fa52068b947cc125d5e76b0e24911ea4f (commit)


- Log -----------------------------------------------------------------
commit b9d4597a71a404851e3180b476ffe6186131adac
Author: Katsumi Yamaoka <[email protected]>
Date:   Tue Sep 1 06:14:08 2015 +0000

    * gnus-sum.el (gnus-summary-search-article):
    Ensure that the article where the search word is found is displayed
    and pointed to in the summary buffer.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 137dd34..dd819db 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,9 @@
+2015-09-01  Katsumi Yamaoka  <[email protected]>
+
+	* gnus-sum.el (gnus-summary-search-article):
+	Ensure that the article where the search word is found is displayed
+	and pointed to in the summary buffer.
+
 2015-08-31  Katsumi Yamaoka  <[email protected]>
 
 	* tls.el (tls-format-message):
diff --git a/lisp/gnus-sum.el b/lisp/gnus-sum.el
index e4c144b..447bd5d 100644
--- a/lisp/gnus-sum.el
+++ b/lisp/gnus-sum.el
@@ -9489,6 +9489,7 @@ Optional argument BACKWARD means do search for backward.
     ;; Return whether we found the regexp.
     (when (eq found 'found)
       (goto-char point)
+      (sit-for 0) ;; Ensure that the point is visible in the summary window.
       (gnus-summary-show-thread)
       (gnus-summary-goto-subject gnus-current-article)
       (gnus-summary-position-point)

-----------------------------------------------------------------------
Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we listed those
revisions in full, above.

Summary of changes:
 lisp/ChangeLog   |    6 ++++++
 lisp/gnus-sum.el |    1 +
 2 files changed, 7 insertions(+)

This is an automated email from the git hooks/post-receive script. It was
generated because a ref change was pushed to the repository containing
the project "Gnus Project".

The branch, master has been updated


hooks/post-receive
-- 
Gnus Project