diff options
| author | bd <bdunahu@operationnull.com> | 2024-11-29 19:15:55 -0500 |
|---|---|---|
| committer | bd <bdunahu@operationnull.com> | 2024-11-29 19:15:55 -0500 |
| commit | 007c2ec4f8fa990090dcf8e95dd8e01954df37da (patch) | |
| tree | 576f2f25511125f239322054bb947e1cee6a8beb /.config/emacs/modules/bd--modeline.el | |
| parent | d7d14098236cac5678a17dc981a8d322fcbf1f67 (diff) | |
Use built-in battery display
Diffstat (limited to '.config/emacs/modules/bd--modeline.el')
| -rw-r--r-- | .config/emacs/modules/bd--modeline.el | 18 |
1 files changed, 9 insertions, 9 deletions
diff --git a/.config/emacs/modules/bd--modeline.el b/.config/emacs/modules/bd--modeline.el index 382944e..15b470f 100644 --- a/.config/emacs/modules/bd--modeline.el +++ b/.config/emacs/modules/bd--modeline.el @@ -21,11 +21,11 @@ (defface bd/underline-shadow `((t :inherit shadow - :underline t)) + :bold t)) "Shadow with an underline.") (defvar-local bd/buffer-identification-mode-line - '(:eval (format "%s " (propertize (buffer-name) 'face 'bd/underline-shadow))) + '(:eval (format "%s" (propertize (buffer-name) 'face 'bd/underline-shadow))) "Formats the modeline-buffer-name.") ;;;; pos @@ -42,16 +42,14 @@ (mapconcat 'concat (cdr (split-string vc-mode "[:-]")) "-")) (defvar-local bd/vc-mode-line - '(:eval (when (and vc-mode (not (eq major-mode 'magit-status-mode))) ; fix to avoid bug which occurs in magit buffer (don't remember) + '(:eval (when (and vc-mode (not (eq major-mode 'magit-status-mode))) (format " %s " (propertize (git-vc-modeline) 'face 'shadow)))) "Formats the checked out git repository.") -(dolist (construct '(bd/time-mode-line - bd/buffer-identification-mode-line - bd/vc-mode-line - bd/line-position)) +(dolist (construct '(bd/buffer-identification-mode-line + bd/vc-mode-line)) (put construct 'risky-local-variable t)) @@ -59,9 +57,11 @@ (list mode-line-front-space bd/buffer-identification-mode-line + " -- " mode-line-modes - mode-line-modified - bd/vc-mode-line + " -- " + bd/vc-mode-line + " -- " bd/line-position)) |