aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorTino Calancha2016-06-05 01:06:12 +0300
committerJuri Linkov2016-06-05 01:06:12 +0300
commit700afe62a4cbd9ecf24551ddc4747e6319fb51a2 (patch)
treec7e8588595c4de3895dccf72fe6b8c9eecbb4b3b
parentabfe07ad61d6f95c3dc0b1aee179a397f1d0f9fc (diff)
downloademacs-700afe62a4cbd9ecf24551ddc4747e6319fb51a2.tar.gz
emacs-700afe62a4cbd9ecf24551ddc4747e6319fb51a2.zip
isearch-edit-string resumes multi isearches
* lisp/isearch.el (with-isearch-suspended): Remember and restore multi-isearch variables. (Bug#21663)
-rw-r--r--lisp/isearch.el10
1 files changed, 9 insertions, 1 deletions
diff --git a/lisp/isearch.el b/lisp/isearch.el
index 7360a0b3742..eabf05b0b17 100644
--- a/lisp/isearch.el
+++ b/lisp/isearch.el
@@ -1259,6 +1259,11 @@ You can update the global isearch variables by setting new values to
1259 (isearch-adjusted isearch-adjusted) 1259 (isearch-adjusted isearch-adjusted)
1260 (isearch-yank-flag isearch-yank-flag) 1260 (isearch-yank-flag isearch-yank-flag)
1261 (isearch-error isearch-error) 1261 (isearch-error isearch-error)
1262
1263 (multi-isearch-file-list-new multi-isearch-file-list)
1264 (multi-isearch-buffer-list-new multi-isearch-buffer-list)
1265 (multi-isearch-next-buffer-function multi-isearch-next-buffer-current-function)
1266 (multi-isearch-current-buffer-new multi-isearch-current-buffer)
1262 ;;; Don't bind this. We want isearch-search, below, to set it. 1267 ;;; Don't bind this. We want isearch-search, below, to set it.
1263 ;;; And the old value won't matter after that. 1268 ;;; And the old value won't matter after that.
1264 ;;; (isearch-other-end isearch-other-end) 1269 ;;; (isearch-other-end isearch-other-end)
@@ -1313,7 +1318,10 @@ You can update the global isearch variables by setting new values to
1313 isearch-message isearch-new-message 1318 isearch-message isearch-new-message
1314 isearch-forward isearch-new-forward 1319 isearch-forward isearch-new-forward
1315 isearch-regexp-function isearch-new-regexp-function 1320 isearch-regexp-function isearch-new-regexp-function
1316 isearch-case-fold-search isearch-new-case-fold) 1321 isearch-case-fold-search isearch-new-case-fold
1322 multi-isearch-current-buffer multi-isearch-current-buffer-new
1323 multi-isearch-file-list multi-isearch-file-list-new
1324 multi-isearch-buffer-list multi-isearch-buffer-list-new)
1317 1325
1318 ;; Restore the minibuffer message before moving point. 1326 ;; Restore the minibuffer message before moving point.
1319 (funcall (or isearch-message-function #'isearch-message) nil t) 1327 (funcall (or isearch-message-function #'isearch-message) nil t)