emenel/doomemacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Fix non-integer max-length in *buffer-path mode-line segment

Browse source
This commit is contained in:
Henrik Lissner 2016-02-17 20:05:39 -05:00
parent d303a1eb6f
commit 53ac744800
1 changed files with 3 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

5
core/core-ui.el
View file

@ -247,8 +247,8 @@
(spaceline-define-segment *buffer-path (spaceline-define-segment *buffer-path
(if buffer-file-name (if buffer-file-name
(let* ((project-path (let (projectile-require-project-root) (projectile-project-root))) (let* ((project-path (let (projectile-require-project-root) (projectile-project-root)))
(buffer-path (file-relative-name buffer-file-name project-path)) (buffer-path (f-relative buffer-file-name project-path))
(max-length (/ (window-width) 2)) (max-length (truncate (/ (window-width) 1.75)))
(path-len (length buffer-path))) (path-len (length buffer-path)))
(concat (file-name-nondirectory (directory-file-name project-path)) (concat (file-name-nondirectory (directory-file-name project-path))
"/" "/"
@ -400,6 +400,7 @@ iedit."
(spaceline-define-segment *buffer-size (spaceline-define-segment *buffer-size
(powerline-buffer-size) (powerline-buffer-size)
:when (not (eq major-mode 'org-mode))
:tight-right t :tight-right t
:skip-alternate t) :skip-alternate t)