1
0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-26 19:18:50 +00:00

Move window-point in bibtex-search-entry

* lisp/textmodes/bibtex.el (bibtex-search-entry): Move window-point
to record found.
This commit is contained in:
Roland Winkler 2018-05-24 13:38:48 -05:00
parent 4bb2741b7e
commit 43a9c268c7

View File

@ -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)))