From c7a49dc313feb56a9b43a58fc44707639a70b6fa Mon Sep 17 00:00:00 2001 From: BardofSprites Date: Sun, 16 Mar 2025 17:43:07 -0400 Subject: dedicated window indicator --- bard-elisp/bard-modeline.el | 11 +++++++++++ 1 file changed, 11 insertions(+) (limited to 'bard-elisp/bard-modeline.el') 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 -- cgit v1.2.3