Move window-point in bibtex-search-entry

* lisp/textmodes/bibtex.el (bibtex-search-entry): Move window-point
to record found.

diff --git a/lisp/textmodes/bibtex.el b/lisp/textmodes/bibtex.el
index a3f98043581c34fb17f75f2cf2e4a0e2b56a36ff..efab9d8e3bd9d416e09f0605016180123921985d 100644 (file)
--- a/lisp/textmodes/bibtex.el
+++ b/lisp/textmodes/bibtex.el
@@ -4105,10 +4105,10 @@ A prefix arg negates the value of `bibtex-search-entry-globally'."
                     (setq buffer (pop buffer-list)))
           (with-current-buffer buffer
             (if (cdr (assoc-string key bibtex-reference-keys))
-                ;; `bibtex-search-entry' moves point if key found
                 (setq found (bibtex-search-entry key)))))
         (cond ((and found display)
               (switch-to-buffer buffer)
+               (goto-char found)
               (bibtex-reposition-window))
               (found (set-buffer buffer))
               (display (message "Key `%s' not found" key)))