Fix UT issue.

This commit is contained in:
Vincent Zhang 2021-07-22 18:13:39 +08:00
parent 233bad9db5
commit 8cbb0457f3

View file

@ -37,11 +37,11 @@
(ert-deftest doom-modeline-icon/octicon-icon () (ert-deftest doom-modeline-icon/octicon-icon ()
(let ((doom-modeline-icon t) (let ((doom-modeline-icon t)
(doom-modeline-unicode-fallback t)) (doom-modeline-unicode-fallback t))
(cl-flet ((display-graphic-p (&optional _display) t)) ;; In TUI, fallback to unicode.
(should (should
(string= (substring-no-properties (string= (substring-no-properties
(doom-modeline-icon 'octicon "octoface" "" ":)" 'error)) (doom-modeline-icon 'octicon "octoface" "" ":)" 'error))
""))))) ""))))
(ert-deftest doom-modeline-icon/octicon-unicode () (ert-deftest doom-modeline-icon/octicon-unicode ()
(let ((doom-modeline-icon nil) (let ((doom-modeline-icon nil)