diff options
| author | Artur Malabarba | 2015-10-30 11:04:50 +0000 |
|---|---|---|
| committer | Artur Malabarba | 2015-10-30 11:08:57 +0000 |
| commit | 25be5df44a7c4e67e365b428a424e9dd957f2687 (patch) | |
| tree | 83935a4f355c393701062e33be0149107e7fb127 /lisp | |
| parent | 44470fed6f720792b2d91b907c52ce30559d03e7 (diff) | |
| download | emacs-25be5df44a7c4e67e365b428a424e9dd957f2687.tar.gz emacs-25be5df44a7c4e67e365b428a424e9dd957f2687.zip | |
* lisp/isearch.el: Avoid an error that blocks isearch
(isearch-update): Don't error if `isearch--current-buffer' has
been killed.
* test/automated/isearch-tests.el (isearch--test-update): New
file.
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/isearch.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/isearch.el b/lisp/isearch.el index e9eec013580..b762884945e 100644 --- a/lisp/isearch.el +++ b/lisp/isearch.el | |||
| @@ -954,7 +954,7 @@ used to set the value of `isearch-regexp-function'." | |||
| 954 | "This is called after every isearch command to update the display. | 954 | "This is called after every isearch command to update the display. |
| 955 | The last thing it does is to run `isearch-update-post-hook'." | 955 | The last thing it does is to run `isearch-update-post-hook'." |
| 956 | (unless (eq (current-buffer) isearch--current-buffer) | 956 | (unless (eq (current-buffer) isearch--current-buffer) |
| 957 | (when isearch--current-buffer | 957 | (when (buffer-live-p isearch--current-buffer) |
| 958 | (with-current-buffer isearch--current-buffer | 958 | (with-current-buffer isearch--current-buffer |
| 959 | (setq cursor-sensor-inhibit (delq 'isearch cursor-sensor-inhibit)))) | 959 | (setq cursor-sensor-inhibit (delq 'isearch cursor-sensor-inhibit)))) |
| 960 | (setq isearch--current-buffer (current-buffer)) | 960 | (setq isearch--current-buffer (current-buffer)) |