emenel/doomemacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Update tests for doom/what-face

Browse source
This commit is contained in:
Henrik Lissner 2018-06-15 21:31:13 +02:00
parent 4856217c84
commit 7773a312aa
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395
1 changed files with 4 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

8
core/test/test-autoload-help.el
View file

@ -14,9 +14,9 @@
(insert (propertize "Hello " 'face 'font-lock-keyword-face))
(insert "world"))
(it "returns list of faces at point"
(expect (doom/what-face (point-min)) :to-equal '((font-lock-keyword-face) ())))
(expect (doom/what-face nil (point-min)) :to-equal '((font-lock-keyword-face) ())))
(it "returns nil if no faces at point"
(expect (doom/what-face (point-max)) :to-be nil)))
(expect (doom/what-face nil (point-max)) :to-be nil)))
(describe "what-face overlays"
(before-each
@ -25,7 +25,7 @@
(overlay-put ov 'face 'font-lock-keyword-face)))
(it "returns list of overlays at point"
(expect (doom/what-face (point-min)) :to-equal '(() (font-lock-keyword-face))))
(expect (doom/what-face nil (point-min)) :to-equal '(() (font-lock-keyword-face))))
(it "returns nil if no overlays at point"
(expect (doom/what-face (point-max)) :to-be nil))))
(expect (doom/what-face nil (point-max)) :to-be nil))))