diff options
Diffstat (limited to 'test')
| -rw-r--r-- | test/lisp/textmodes/css-mode-tests.el | 7 |
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) |