Fix warnings.

This commit is contained in:
Vincent Zhang 2018-07-01 01:35:07 +08:00
parent b2c187ea66
commit 1b32790cba

View file

@ -403,7 +403,7 @@ active.")
'face (if file-faces `(:inherit ,file-faces))))))))) 'face (if file-faces `(:inherit ,file-faces)))))))))
(defun doom-modeline--buffer-file-name-relative (&optional include-project) (defun doom-modeline--buffer-file-name-relative (&optional include-project)
"Propertized variable `buffer-file-name' showing directories relative to `INCLUDE-PROJECT' root only." "Propertized variable `buffer-file-name' showing directories relative to INCLUDE-PROJECT root only."
(let ((root (doom-modeline-project-root)) (let ((root (doom-modeline-project-root))
(active (doom-modeline--active))) (active (doom-modeline--active)))
(if (null root) (if (null root)