mirror of
https://github.com/vale981/doom-modeline
synced 2025-03-04 17:01:39 -05:00
Fix UT issue.
This commit is contained in:
parent
51af51d248
commit
d0b8dea080
1 changed files with 15 additions and 12 deletions
|
@ -37,26 +37,29 @@
|
|||
(ert-deftest doom-modeline-icon/octicon-icon ()
|
||||
(let ((doom-modeline-icon t)
|
||||
(doom-modeline-unicode-fallback t))
|
||||
(cl-flet ((display-graphic-p () t))
|
||||
(should
|
||||
(string= (substring-no-properties
|
||||
(doom-modeline-icon 'octicon "octoface" "☻" ":)" 'error))
|
||||
""))))
|
||||
"")))))
|
||||
|
||||
(ert-deftest doom-modeline-icon/octicon-unicode ()
|
||||
(let ((doom-modeline-icon nil)
|
||||
(doom-modeline-unicode-fallback t))
|
||||
(cl-flet ((display-graphic-p () t))
|
||||
(should
|
||||
(string= (substring-no-properties
|
||||
(doom-modeline-icon 'octicon "octoface" "☻" ":)" 'error))
|
||||
"☻"))))
|
||||
"☻")))))
|
||||
|
||||
(ert-deftest doom-modeline-icon/octicon-text ()
|
||||
(let ((doom-modeline-icon nil)
|
||||
(doom-modeline-unicode-fallback nil))
|
||||
(cl-flet ((display-graphic-p () t))
|
||||
(should
|
||||
(string= (substring-no-properties
|
||||
(doom-modeline-icon 'octicon "octoface" "☻" ":)" 'error))
|
||||
":)"))))
|
||||
":)")))))
|
||||
|
||||
(ert-deftest doom-modeline-project-root/ffip ()
|
||||
(let ((default-directory "/home/user/project/")
|
||||
|
|
Loading…
Add table
Reference in a new issue