aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorJuri Linkov2008-07-23 23:51:15 +0000
committerJuri Linkov2008-07-23 23:51:15 +0000
commit3c0aa5e65b9dd3fb38ce095683423b072e42c1bd (patch)
treec231e4189465f50b143cfcbf3a526469f0f4ffb0
parent29d2a698f87f091846051fc6eeb9528c8e25fb9c (diff)
downloademacs-3c0aa5e65b9dd3fb38ce095683423b072e42c1bd.tar.gz
emacs-3c0aa5e65b9dd3fb38ce095683423b072e42c1bd.zip
(isearch-message-prefix): Display "Multi" when
`multi-isearch-next-buffer-current-function' is non-nil. (isearch-search-string): Replace `isearch-buffers-next-buffer-function' with `multi-isearch-next-buffer-current-function', and `isearch-buffers-current-buffer' with `multi-isearch-current-buffer'.
-rw-r--r--lisp/isearch.el7
1 files changed, 4 insertions, 3 deletions
diff --git a/lisp/isearch.el b/lisp/isearch.el
index 130685fb882..2deb90e2f56 100644
--- a/lisp/isearch.el
+++ b/lisp/isearch.el
@@ -2111,6 +2111,7 @@ If there is no completion possible, say so and continue searching."
2111 (if isearch-wrapped "wrapped ") 2111 (if isearch-wrapped "wrapped ")
2112 (if isearch-word "word " "") 2112 (if isearch-word "word " "")
2113 (if isearch-regexp "regexp " "") 2113 (if isearch-regexp "regexp " "")
2114 (if multi-isearch-next-buffer-current-function "multi " "")
2114 (if nonincremental "search" "I-search") 2115 (if nonincremental "search" "I-search")
2115 (if isearch-forward "" " backward") 2116 (if isearch-forward "" " backward")
2116 (if current-input-method 2117 (if current-input-method
@@ -2179,9 +2180,9 @@ Can be changed via `isearch-search-fun-function' for special needs."
2179 (when pos1 2180 (when pos1
2180 ;; When using multiple buffers isearch, switch to the new buffer here, 2181 ;; When using multiple buffers isearch, switch to the new buffer here,
2181 ;; because `save-excursion' above doesn't allow doing it inside funcall. 2182 ;; because `save-excursion' above doesn't allow doing it inside funcall.
2182 (if (and isearch-buffers-next-buffer-function 2183 (if (and multi-isearch-next-buffer-current-function
2183 (buffer-live-p isearch-buffers-current-buffer)) 2184 (buffer-live-p multi-isearch-current-buffer))
2184 (switch-to-buffer isearch-buffers-current-buffer)) 2185 (switch-to-buffer multi-isearch-current-buffer))
2185 (goto-char pos1)) 2186 (goto-char pos1))
2186 pos1)) 2187 pos1))
2187 2188