This commit is contained in:
Vincent Zhang 2021-08-24 17:51:23 +08:00
parent 5ed7a1bd0e
commit 5f308333a2

View file

@ -59,13 +59,22 @@
(doom-modeline-icon 'octicon "octoface" "" ":)" 'error))
":)"))))
(ert-deftest doom-modeline-project-root/ffip ()
(ert-deftest doom-modeline-project-root/auto ()
(let ((default-directory "/home/user/project/")
(doom-modeline-project-detection 'auto)
(doom-modeline--project-detected-p t)
(doom-modeline--project-root nil))
(cl-flet ((project-current (&optional _maybe-prompt _dir)
`(vc . ,default-directory)))
(should (string= (doom-modeline-project-root) default-directory)))))
(ert-deftest doom-modeline-project-root/ffip ()
(let ((default-directory "/home/user/project-ffip/")
(doom-modeline-project-detection 'ffip)
(doom-modeline--project-detected-p t)
(doom-modeline--project-root nil))
(cl-flet ((ffip-get-project-root-directory () "/home/user/project-ffip/"))
(should (string= (ffip-get-project-root-directory) "/home/user/project-ffip/")))))
(should (string= (doom-modeline-project-root) "/home/user/project-ffip/")))))
(ert-deftest doom-modeline-project-root/projectile ()
(let ((default-directory "/home/user/projectile/")