diff options
author | Case Duckworth | 2022-01-04 14:41:46 -0600 |
---|---|---|
committer | Case Duckworth | 2022-01-04 14:41:46 -0600 |
commit | 13a3ba026fb29fb9faccca625c41d90769c56db4 (patch) | |
tree | 8b8c332ecd770917ed40407599e6b858ffdb2fea /lisp | |
parent | Add titlecase-dwim to +casing-map (diff) | |
download | emacs-13a3ba026fb29fb9faccca625c41d90769c56db4.tar.gz emacs-13a3ba026fb29fb9faccca625c41d90769c56db4.zip |
A few various changes: typos and bugs
Diffstat (limited to 'lisp')
-rw-r--r-- | lisp/+modeline.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/+modeline.el b/lisp/+modeline.el index 5f46a75..db3deb4 100644 --- a/lisp/+modeline.el +++ b/lisp/+modeline.el | |||
@@ -88,10 +88,10 @@ This function makes a lambda, so you can throw it straight into | |||
88 | (defun +modeline-major-mode (&optional spacer) | 88 | (defun +modeline-major-mode (&optional spacer) |
89 | "Display the current `major-mode'." | 89 | "Display the current `major-mode'." |
90 | (concat (or spacer +modeline-default-spacer) | 90 | (concat (or spacer +modeline-default-spacer) |
91 | (propertize (+string-truncate (format-mode-line mode-name) | 91 | (propertize (+string-truncate (format-mode-line mode-name) 12) |
92 | 12 "~") | ||
93 | 'face 'bold | 92 | 'face 'bold |
94 | 'keymap mode-line-major-mode-keymap | 93 | 'keymap mode-line-major-mode-keymap |
94 | 'help-echo (concat mode-name " mode\nmouse-1: show menu.") | ||
95 | 'mouse-face 'mode-line-highlight))) | 95 | 'mouse-face 'mode-line-highlight))) |
96 | 96 | ||
97 | (defcustom +modeline-modified-icon-alist '((ephemeral . "*") | 97 | (defcustom +modeline-modified-icon-alist '((ephemeral . "*") |