Skip to content

Commit bb5497f

Browse files
Bozhidar Batsovkommen
authored andcommitted
Refine keyword literals font-locking
1 parent e502dc4 commit bb5497f

File tree

1 file changed

+6
-0
lines changed

1 file changed

+6
-0
lines changed

clojure-mode-test.el

Lines changed: 6 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -171,6 +171,12 @@ POS."
171171
:tags '(fontification syntax-table)
172172
(should (eq (clojure-test-face-at 4 8 "(= false x)") 'font-lock-constant-face)))
173173

174+
(ert-deftest clojure-mode-syntax-table/keyword-meta ()
175+
:tags '(fontification syntax-table)
176+
(clojure-test-with-temp-buffer "^:meta-data"
177+
(should (eq (clojure-test-face-at 1 1) nil))
178+
(should (eq (clojure-test-face-at 2 11) 'clojure-keyword-face))))
179+
174180
(ert-deftest clojure-mode-syntax-table/characters ()
175181
:tags '(fontification syntax-table)
176182
(should (eq (clojure-test-face-at 1 2 "\\a") 'clojure-character-face))

0 commit comments

Comments
 (0)