From: Katsumi Yamaoka Date: Tue, 1 Sep 2015 06:14:08 +0000 (+0000) Subject: * gnus-sum.el (gnus-summary-search-article): X-Git-Url: http://cgit.sxemacs.org/?p=gnus;a=commitdiff_plain;h=b9d4597a71a404851e3180b476ffe6186131adac * 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 137dd3472..dd819dbcb 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,9 @@ +2015-09-01 Katsumi Yamaoka + + * 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 * tls.el (tls-format-message): diff --git a/lisp/gnus-sum.el b/lisp/gnus-sum.el index e4c144b92..447bd5d56 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)