From b6e0b66e0edfcf339b37cd4ddc99a56dee1df213 Mon Sep 17 00:00:00 2001 From: Dmitry Gutov Date: Sat, 15 May 2021 23:46:30 +0300 Subject: Update CSS completion tests * test/lisp/textmodes/css-mode-tests.el (css-test-complete-pseudo-class) (css-test-complete-pseudo-element): Update the tests for recent changes. --- test/lisp/textmodes/css-mode-tests.el | 12 ++++++------ 1 file changed, 6 insertions(+), 6 deletions(-) (limited to 'test/lisp/textmodes/css-mode-tests.el') diff --git a/test/lisp/textmodes/css-mode-tests.el b/test/lisp/textmodes/css-mode-tests.el index 97f5abf1156..abf85dbff43 100644 --- a/test/lisp/textmodes/css-mode-tests.el +++ b/test/lisp/textmodes/css-mode-tests.el @@ -143,20 +143,20 @@ (css-mode) (insert "body:a") (let ((completions (css-mode-tests--completions))) - (should (member "active" completions)) - (should-not (member "disabled" completions)) + (should (member ":active" completions)) + (should-not (member ":disabled" completions)) ;; Don't include pseudo-elements - (should-not (member "after" completions))))) + (should-not (member "::after" completions))))) (ert-deftest css-test-complete-pseudo-element () (with-temp-buffer (css-mode) (insert "body::a") (let ((completions (css-mode-tests--completions))) - (should (member "after" completions)) - (should-not (member "disabled" completions)) + (should (member "::after" completions)) + (should-not (member "::disabled" completions)) ;; Don't include pseudo-classes - (should-not (member "active" completions))))) + (should-not (member ":active" completions))))) (ert-deftest css-test-complete-at-rule () (with-temp-buffer -- cgit v1.2.3