From 094f8e8c807d9f59233406f70fee8bbb7c6d5bea Mon Sep 17 00:00:00 2001
From: Tom Willemse
Date: Thu, 10 Apr 2025 16:34:50 -0700
Subject: stumpwm: Make mode-line a little nicer

---
 oni/home/services/stumpwm/config | 12 +++++++-----
 1 file changed, 7 insertions(+), 5 deletions(-)

(limited to 'oni')

diff --git a/oni/home/services/stumpwm/config b/oni/home/services/stumpwm/config
index d21d9c8..f217f33 100644
--- a/oni/home/services/stumpwm/config
+++ b/oni/home/services/stumpwm/config
@@ -79,10 +79,12 @@ after it has been unlocked."
 (set-focus-color "#ff9800")
 (set-unfocus-color "#3f4242")
 
-(setf *mode-line-background-color* "#5b6161"
-      *mode-line-foreground-color* "#bfbfbf")
+(setf *mode-line-background-color* "#111414"
+      *mode-line-foreground-color* "#bfbfbf"
+      *mode-line-border-width* 0
+      *mode-line-pad-x* 10)
 (setf *screen-mode-line-format*
-      (list " [^B%n^b] "
+      (list "[ ^B%n^b ] "
             "^[^(:bg \"#f17272\")^(:fg \"#222424\") "
             '(:eval
               (or (ignore-errors (window-title (current-window)))
@@ -90,9 +92,9 @@ after it has been unlocked."
             " ^]^>"
             '(:eval
               (if (vpn-connected-p)
-                  "^*5^B[VPN]^b^n "
+                  "^*5^B[ VPN ]^b^n "
                   ""))
-            "%d "))
+            "[ %d ]         "))
 
 ;;; Redefinition of the make mode-line window to add the Dock window type.
 (defun stumpwm::make-mode-line-window (screen)
-- 
cgit v1.3-2-g0d8e