mirror of
https://github.com/correl/doom-modeline.git
synced 2024-11-24 03:00:10 +00:00
Clean warnings.
This commit is contained in:
parent
aa0e36fd66
commit
9ca4edf710
1 changed files with 1 additions and 1 deletions
|
@ -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)))
|
||||||
|
|
Loading…
Reference in a new issue