diff options
author | Case Duckworth | 2021-10-01 19:07:33 -0500 |
---|---|---|
committer | Case Duckworth | 2021-10-01 19:07:33 -0500 |
commit | 437f92c71ca0ca309f51d83567f03f11e1ca7707 (patch) | |
tree | fc3a0894c2a78796d0086d6a85cb7e0dbb602a52 | |
parent | Blep (diff) | |
download | emacs-437f92c71ca0ca309f51d83567f03f11e1ca7707.tar.gz emacs-437f92c71ca0ca309f51d83567f03f11e1ca7707.zip |
Change modeline font
-rw-r--r-- | lisp/acdw-modeline.el | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/lisp/acdw-modeline.el b/lisp/acdw-modeline.el index 9963309..21068bd 100644 --- a/lisp/acdw-modeline.el +++ b/lisp/acdw-modeline.el | |||
@@ -36,10 +36,10 @@ Otherwise, cdr should be a function that takes two points (see `count-words')." | |||
36 | (propertize (concat " " | 36 | (propertize (concat " " |
37 | (truncate-string (/ (window-total-width) 2) | 37 | (truncate-string (/ (window-total-width) 2) |
38 | (buffer-name) "~")) | 38 | (buffer-name) "~")) |
39 | 'face | 39 | 'face 'bold |
40 | (if (buffer-modified-p) | 40 | ;; (if (buffer-modified-p) |
41 | 'font-lock-warning-face | 41 | ;; 'font-lock-warning-face |
42 | 'font-lock-type-face) | 42 | ;; 'font-lock-type-face) |
43 | 'help-echo (or (buffer-file-name) | 43 | 'help-echo (or (buffer-file-name) |
44 | (buffer-name)))) | 44 | (buffer-name)))) |
45 | 45 | ||