Clean warnings.

This commit is contained in:
Vincent Zhang 2018-10-24 18:17:02 +08:00
parent aa0e36fd66
commit 9ca4edf710

View file

@ -496,7 +496,7 @@ active.")
'help-echo buffer-file-truename))) 'help-echo buffer-file-truename)))
(defun doom-modeline--buffer-file-name-truncate (file-path true-file-path &optional truncate-tail) (defun doom-modeline--buffer-file-name-truncate (file-path true-file-path &optional truncate-tail)
"Propertized `buffer-file-name' that truncates every dir along path. "Propertized variable `buffer-file-name' that truncates every dir along path.
If TRUNCATE-TAIL is t also truncate the parent directory of the file." If TRUNCATE-TAIL is t also truncate the parent directory of the file."
(let ((dirs (shrink-path-prompt (file-name-directory true-file-path))) (let ((dirs (shrink-path-prompt (file-name-directory true-file-path)))
(active (doom-modeline--active))) (active (doom-modeline--active)))