diff options
author | Case Duckworth | 2022-01-14 17:20:23 -0600 |
---|---|---|
committer | Case Duckworth | 2022-01-14 17:20:23 -0600 |
commit | 4b2e57e396314e63d70558e0aa5ad32c1cf87532 (patch) | |
tree | bcd7ccb4c2fac92f7b93702e2c9ec5fa21e4a068 /lisp/+modeline.el | |
parent | Merge branch 'main' of https://tildegit.org/acdw/emacs (diff) | |
download | emacs-4b2e57e396314e63d70558e0aa5ad32c1cf87532.tar.gz emacs-4b2e57e396314e63d70558e0aa5ad32c1cf87532.zip |
David Bowie
Diffstat (limited to 'lisp/+modeline.el')
-rw-r--r-- | lisp/+modeline.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/+modeline.el b/lisp/+modeline.el index 3d7b6b7..7683269 100644 --- a/lisp/+modeline.el +++ b/lisp/+modeline.el | |||
@@ -61,7 +61,9 @@ This function makes a lambda, so you can throw it straight into | |||
61 | "Display the buffer name." | 61 | "Display the buffer name." |
62 | (concat (or spacer +modeline-default-spacer) | 62 | (concat (or spacer +modeline-default-spacer) |
63 | (propertize | 63 | (propertize |
64 | (+string-align (buffer-name) 20 :ellipsis nil) | 64 | (truncate-string-to-width (buffer-name) |
65 | (min 24 (/ (window-width) 3)) | ||
66 | nil ?\ t) | ||
65 | 'help-echo (or (buffer-file-name) | 67 | 'help-echo (or (buffer-file-name) |
66 | (buffer-name)) | 68 | (buffer-name)) |
67 | 'mouse-face 'mode-line-highlight))) | 69 | 'mouse-face 'mode-line-highlight))) |