diff options
| author | Case Duckworth | 2021-10-11 18:09:13 -0500 |
|---|---|---|
| committer | Case Duckworth | 2021-10-11 18:09:13 -0500 |
| commit | bfd024dd2b2e3a3e180eb541852968d3e18e0d6d (patch) | |
| tree | 5cf21347bb380d126c458a4c0a43c5d6ab579b55 /lisp | |
| parent | Auto-save after a minute of idle time (diff) | |
| download | emacs-bfd024dd2b2e3a3e180eb541852968d3e18e0d6d.tar.gz emacs-bfd024dd2b2e3a3e180eb541852968d3e18e0d6d.zip | |
Change up the modeline
- Constant width for buffer name - Re-think nyan-mode minimum window width
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/acdw-modeline.el | 4 |
1 files changed, 1 insertions, 3 deletions
| diff --git a/lisp/acdw-modeline.el b/lisp/acdw-modeline.el index a9020c5..adfcb44 100644 --- a/lisp/acdw-modeline.el +++ b/lisp/acdw-modeline.el | |||
| @@ -33,9 +33,7 @@ Otherwise, cdr should be a function that takes two points (see `count-words')." | |||
| 33 | 33 | ||
| 34 | (defun acdw-modeline/buffer-name () ; gonsie | 34 | (defun acdw-modeline/buffer-name () ; gonsie |
| 35 | "Display the buffer name in a face reflecting its modified status." | 35 | "Display the buffer name in a face reflecting its modified status." |
| 36 | (propertize (concat " " | 36 | (propertize (concat (format " %-20s" (truncate-string 20 (buffer-name) "~"))) |
| 37 | (truncate-string (/ (window-total-width) 2) | ||
| 38 | (buffer-name) "~")) | ||
| 39 | 'face 'bold | 37 | 'face 'bold |
| 40 | ;; (if (buffer-modified-p) | 38 | ;; (if (buffer-modified-p) |
| 41 | ;; 'font-lock-warning-face | 39 | ;; 'font-lock-warning-face |