aboutsummaryrefslogtreecommitdiff
path: root/bard-elisp
diff options
context:
space:
mode:
Diffstat (limited to 'bard-elisp')
-rw-r--r--bard-elisp/bard-modeline.el11
1 files changed, 11 insertions, 0 deletions
diff --git a/bard-elisp/bard-modeline.el b/bard-elisp/bard-modeline.el
index e1892ef..ceb7fbf 100644
--- a/bard-elisp/bard-modeline.el
+++ b/bard-elisp/bard-modeline.el
@@ -271,6 +271,16 @@ Specific to the current window's mode line.")
'mouse-face 'mode-line-highlight)))
"Mode line construct for showing remote file name.")
+;;;; Dedicated window
+
+(defvar-local prot-modeline-window-dedicated-status
+ '(:eval
+ (when (window-dedicated-p)
+ (propertize " = "
+ 'face 'prot-modeline-indicator-magenta-bg
+ 'mouse-face 'mode-line-highlight)))
+ "Mode line construct for dedicated window indicator.")
+
;;;; Buffer name and modified status
(defun prot-modeline-buffer-identification-face ()
@@ -552,6 +562,7 @@ Specific to the current window's mode line.")
bard-modeline-ryo-modal-normal
prot-modeline-input-method
prot-modeline-buffer-status
+ prot-modeline-window-dedicated-status
prot-modeline-evil
prot-modeline-buffer-identification
prot-modeline-major-mode