diff options
| author | Noam Postavsky | 2016-09-03 23:38:35 -0400 |
|---|---|---|
| committer | Noam Postavsky | 2016-09-10 09:13:09 -0400 |
| commit | 68f4b5292781bc331b040105c4079902b993835c (patch) | |
| tree | 41915edb4e3077ad99539b04c2b7be51a1b1a8fe /test/lisp | |
| parent | 367f8568bc9e759ebdfb423648891efa0346456b (diff) | |
| download | emacs-68f4b5292781bc331b040105c4079902b993835c.tar.gz emacs-68f4b5292781bc331b040105c4079902b993835c.zip | |
Don't require isearch-update before isearch-done
It is useful to be able to call `isearch-done' unconditionally to
ensure a non-isearching state.
* lisp/isearch.el (isearch-done): Check that `isearch--current-buffer'
is a live buffer before using it (Bug #21091).
* test/lisp/isearch-tests.el (isearch--test-done): Test it.
Diffstat (limited to 'test/lisp')
| -rw-r--r-- | test/lisp/isearch-tests.el | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/test/lisp/isearch-tests.el b/test/lisp/isearch-tests.el index 48c342403c9..52f312d0b97 100644 --- a/test/lisp/isearch-tests.el +++ b/test/lisp/isearch-tests.el | |||
| @@ -28,5 +28,13 @@ | |||
| 28 | (isearch-update) | 28 | (isearch-update) |
| 29 | (should (equal isearch--current-buffer (current-buffer))))) | 29 | (should (equal isearch--current-buffer (current-buffer))))) |
| 30 | 30 | ||
| 31 | (ert-deftest isearch--test-done () | ||
| 32 | ;; Normal operation. | ||
| 33 | (isearch-update) | ||
| 34 | (isearch-done) | ||
| 35 | (should-not isearch--current-buffer) | ||
| 36 | ;; Bug #21091: let `isearch-done' work without `isearch-update'. | ||
| 37 | (isearch-done)) | ||
| 38 | |||
| 31 | (provide 'isearch-tests) | 39 | (provide 'isearch-tests) |
| 32 | ;;; isearch-tests.el ends here | 40 | ;;; isearch-tests.el ends here |