mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00
Code Issues Projects Releases Wiki Activity

(isearch-search-string): After finding the next

Browse source 
occurrence switch to buffer isearch-buffers-current-buffer when
isearch-buffers-next-buffer-function is non-nil and
isearch-buffers-current-buffer is live.
This commit is contained in:
Juri Linkov 2007-10-22 23:44:29 +00:00
parent ed779c49f3
commit d240f431cb
1 changed files with 7 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

9
lisp/isearch.el
View file

@ -2035,8 +2035,13 @@ Can be changed via `isearch-search-fun-function' for special needs."
(if isearch-forward (< pos2 pos1) (> pos2 pos1))))
(setq pos1 pos2)
(set-match-data match-data)))))
(if pos1
(goto-char pos1))
(when pos1
;; When using multiple buffers isearch, switch to the new buffer here,
;; because `save-excursion' above doesn't allow doing it inside funcall.
(if (and isearch-buffers-next-buffer-function
(buffer-live-p isearch-buffers-current-buffer))
(switch-to-buffer isearch-buffers-current-buffer))
(goto-char pos1))
pos1))
(defun isearch-search ()