diff options
Diffstat (limited to '.config/emacs/modules/bd--modeline.el')
| -rw-r--r-- | .config/emacs/modules/bd--modeline.el | 10 |
1 files changed, 9 insertions, 1 deletions
diff --git a/.config/emacs/modules/bd--modeline.el b/.config/emacs/modules/bd--modeline.el index 5d2af9e..2ca7ccb 100644 --- a/.config/emacs/modules/bd--modeline.el +++ b/.config/emacs/modules/bd--modeline.el @@ -22,7 +22,7 @@ (defvar-local bd/buffer-identification-mode-line '(:eval (format "%s" (propertize (buffer-name) 'face (if (mode-line-window-selected-p) - 'font-lock-keyword-face + 'modus-themes-fg-cyan-intense 'mode-line-inactive)))) "Formats the modeline-buffer-name.") @@ -39,6 +39,11 @@ 'help-echo "mouse-1: Project menu" 'local-map project-mode-line-map)))))) +(defvar-local bd/global-mode-string + '(:eval (when (mode-line-window-selected-p) + global-mode-string)) + "Displays the global mode string only on the current window.") + (column-number-mode 1) (setopt mode-line-position-column-line-format '("%l:%c") mode-line-percent-position nil) @@ -63,6 +68,7 @@ (dolist (construct '(bd/buffer-identification-mode-line bd/project-mode-line bd/vc-mode-line + bd/global-mode-string bd/line-position bd/modeline-window-dedicated)) (put construct 'risky-local-variable t)) @@ -84,6 +90,8 @@ mode-line-mule-info mode-line-modified mode-line-front-space + bd/global-mode-string + mode-line-front-space )) |