about summary refs log tree commit diff stats
path: root/lisp/+modeline.el
diff options
context:
space:
mode:
authorCase Duckworth2022-01-14 21:03:59 -0600
committerCase Duckworth2022-01-14 21:03:59 -0600
commit6f20710673580a9583af7f4004fb8013880a58f1 (patch)
treedf81850700d55f4529cf72386228c371e995e5a9 /lisp/+modeline.el
parentCh ch ch changes (diff)
parentDavid Bowie (diff)
downloademacs-6f20710673580a9583af7f4004fb8013880a58f1.tar.gz
emacs-6f20710673580a9583af7f4004fb8013880a58f1.zip
Turn and face the strange
Diffstat (limited to 'lisp/+modeline.el')
-rw-r--r--lisp/+modeline.el4
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)))