diff options
| author | Stefan Kangas | 2022-06-17 20:08:55 +0200 |
|---|---|---|
| committer | Stefan Kangas | 2022-06-17 20:08:55 +0200 |
| commit | da208f99d801306440092d7b18ccc8d799879f4c (patch) | |
| tree | 5161aa12e4f04374f44b2a63716b5c00221806bf /test | |
| parent | 4cdeec88cef60dfc4366368edc515115ef0ccd02 (diff) | |
| download | emacs-da208f99d801306440092d7b18ccc8d799879f4c.tar.gz emacs-da208f99d801306440092d7b18ccc8d799879f4c.zip | |
Update bookmark tests for recent change
* test/lisp/bookmark-tests.el (bookmark-tests-set/bookmark-use-annotations-t)
(bookmark-tests-edit-annotation)
(bookmark-test-bmenu-send-edited-annotation)
(bookmark-test-bmenu-send-edited-annotation/restore-focus): Update for
recent change.
Diffstat (limited to 'test')
| -rw-r--r-- | test/lisp/bookmark-tests.el | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/test/lisp/bookmark-tests.el b/test/lisp/bookmark-tests.el index a2d8f2d260b..3bea08bc37a 100644 --- a/test/lisp/bookmark-tests.el +++ b/test/lisp/bookmark-tests.el | |||
| @@ -301,7 +301,7 @@ the lexically-bound variable `buffer'." | |||
| 301 | (bookmark-set "foo") | 301 | (bookmark-set "foo") |
| 302 | (should (equal major-mode 'bookmark-edit-annotation-mode)) | 302 | (should (equal major-mode 'bookmark-edit-annotation-mode)) |
| 303 | ;; Should return to the original buffer | 303 | ;; Should return to the original buffer |
| 304 | (bookmark-send-edited-annotation) | 304 | (bookmark-edit-annotation-confirm) |
| 305 | (should (equal (current-buffer) buffer)))))) | 305 | (should (equal (current-buffer) buffer)))))) |
| 306 | 306 | ||
| 307 | (ert-deftest bookmark-tests-kill-line () | 307 | (ert-deftest bookmark-tests-kill-line () |
| @@ -334,7 +334,7 @@ the lexically-bound variable `buffer'." | |||
| 334 | (with-bookmark-test | 334 | (with-bookmark-test |
| 335 | (bookmark-edit-annotation "name") | 335 | (bookmark-edit-annotation "name") |
| 336 | (insert "new text") | 336 | (insert "new text") |
| 337 | (bookmark-send-edited-annotation) | 337 | (bookmark-edit-annotation-confirm) |
| 338 | (should (equal (bookmark-get-annotation "name") "new text")))) | 338 | (should (equal (bookmark-get-annotation "name") "new text")))) |
| 339 | 339 | ||
| 340 | (ert-deftest bookmark-tests-jump () | 340 | (ert-deftest bookmark-tests-jump () |
| @@ -471,7 +471,7 @@ testing `bookmark-bmenu-list'." | |||
| 471 | (with-bookmark-bmenu-test | 471 | (with-bookmark-bmenu-test |
| 472 | (bookmark-bmenu-edit-annotation) | 472 | (bookmark-bmenu-edit-annotation) |
| 473 | (insert "foo") | 473 | (insert "foo") |
| 474 | (bookmark-send-edited-annotation) | 474 | (bookmark-edit-annotation-confirm) |
| 475 | (should (equal (bookmark-get-annotation "name") "foo")))) | 475 | (should (equal (bookmark-get-annotation "name") "foo")))) |
| 476 | 476 | ||
| 477 | (ert-deftest bookmark-test-bmenu-send-edited-annotation/restore-focus () | 477 | (ert-deftest bookmark-test-bmenu-send-edited-annotation/restore-focus () |
| @@ -479,7 +479,7 @@ testing `bookmark-bmenu-list'." | |||
| 479 | (with-bookmark-bmenu-test | 479 | (with-bookmark-bmenu-test |
| 480 | (bookmark-bmenu-edit-annotation) | 480 | (bookmark-bmenu-edit-annotation) |
| 481 | (insert "foo") | 481 | (insert "foo") |
| 482 | (bookmark-send-edited-annotation) | 482 | (bookmark-edit-annotation-confirm) |
| 483 | (should (equal (buffer-name (current-buffer)) bookmark-bmenu-buffer)) | 483 | (should (equal (buffer-name (current-buffer)) bookmark-bmenu-buffer)) |
| 484 | (beginning-of-line) | 484 | (beginning-of-line) |
| 485 | (forward-char 4) | 485 | (forward-char 4) |