Change the color of the window name in the mode line

This commit is contained in:
Tom Willemse 2023-04-22 00:39:16 -07:00
parent c907fbe9db
commit 806901b70d

View file

@ -64,10 +64,11 @@ after it has been unlocked."
*mode-line-foreground-color* "#bfbfbf") *mode-line-foreground-color* "#bfbfbf")
(setf *screen-mode-line-format* (setf *screen-mode-line-format*
(list " [^B%n^b] " (list " [^B%n^b] "
"^[^(:bg \"#f17272\")^(:fg \"#222424\") "
'(:eval '(:eval
(or (ignore-errors (window-title (current-window))) (or (ignore-errors (window-title (current-window)))
"Unknown")) "Unknown"))
"^>" " ^]^>"
'(:eval '(:eval
(if (vpn-connected-p) (if (vpn-connected-p)
"^*5^B[VPN]^b^n " "^*5^B[VPN]^b^n "