From 49a4f06b0675a4a27db1ce5380c02b5043e2d322 Mon Sep 17 00:00:00 2001 From: Lars Ingebrigtsen Date: Fri, 11 Dec 2020 15:21:44 +0100 Subject: [PATCH] Fix object-interval tests * test/src/fns-tests.el (object-intervals): Fix tests. --- test/src/fns-tests.el | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/test/src/fns-tests.el b/test/src/fns-tests.el index 14c0437d5f0..eaa569e0d95 100644 --- a/test/src/fns-tests.el +++ b/test/src/fns-tests.el @@ -986,10 +986,10 @@ (ert-deftest object-intervals () (should (equal (object-intervals (propertize "foo" 'bar 'zot)) - ((0 3 (bar zot))))) + '((0 3 (bar zot))))) (should (equal (object-intervals (concat (propertize "foo" 'bar 'zot) (propertize "foo" 'gazonk "gazonk"))) - ((0 3 (bar zot)) (3 6 (gazonk "gazonk"))))) + '((0 3 (bar zot)) (3 6 (gazonk "gazonk"))))) (should (equal (with-temp-buffer (insert "foobar") @@ -997,5 +997,5 @@ (put-text-property 3 6 'bar 2) (put-text-property 2 5 'zot 3) (object-intervals (current-buffer))) - ((0 1 (foo 1)) (1 2 (zot 3 foo 1)) (2 4 (zot 3 bar 2)) - (4 5 (bar 2)) (5 6 nil))))) + '((0 1 (foo 1)) (1 2 (zot 3 foo 1)) (2 4 (zot 3 bar 2)) + (4 5 (bar 2)) (5 6 nil))))) -- 2.39.2