aboutsummaryrefslogtreecommitdiffstats
path: root/test
diff options
context:
space:
mode:
authorStefan Kangas2022-06-17 20:08:55 +0200
committerStefan Kangas2022-06-17 20:08:55 +0200
commitda208f99d801306440092d7b18ccc8d799879f4c (patch)
tree5161aa12e4f04374f44b2a63716b5c00221806bf /test
parent4cdeec88cef60dfc4366368edc515115ef0ccd02 (diff)
downloademacs-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.el8
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)