aboutsummaryrefslogtreecommitdiffstats
path: root/test
diff options
context:
space:
mode:
Diffstat (limited to 'test')
-rw-r--r--test/lisp/textmodes/css-mode-tests.el7
1 files changed, 7 insertions, 0 deletions
diff --git a/test/lisp/textmodes/css-mode-tests.el b/test/lisp/textmodes/css-mode-tests.el
index 9c5953db4a8..805364c9f42 100644
--- a/test/lisp/textmodes/css-mode-tests.el
+++ b/test/lisp/textmodes/css-mode-tests.el
@@ -57,6 +57,13 @@
57 ;; because it refers to the value class of the same name. 57 ;; because it refers to the value class of the same name.
58 (should (= (length (css--property-values "color")) 18))) 58 (should (= (length (css--property-values "color")) 18)))
59 59
60(ert-deftest css-test-property-value-cache ()
61 "Test that `css--property-value-cache' is in use."
62 (should-not (gethash "word-wrap" css--property-value-cache))
63 (let ((word-wrap-values (css--property-values "word-wrap")))
64 (should (equal (gethash "word-wrap" css--property-value-cache)
65 word-wrap-values))))
66
60(ert-deftest css-test-value-class-lookup () 67(ert-deftest css-test-value-class-lookup ()
61 (should 68 (should
62 (equal (sort (css--value-class-lookup 'position) #'string-lessp) 69 (equal (sort (css--value-class-lookup 'position) #'string-lessp)