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:
parent
4bb2741b7e
commit
43a9c268c7
@ -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)))
|
||||
|
Loading…
Reference in New Issue
Block a user