From 7c7af83a2750ea29b49a7205014eaadf1e889338 Mon Sep 17 00:00:00 2001
From: Tom Willemse
Date: Sat, 22 Apr 2023 00:31:21 -0700
Subject: Show only a single window title in the mode-line

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

diff --git a/oni/home/services/stumpwm/config b/oni/home/services/stumpwm/config
index 3a7f1d4..2c0ff58 100644
--- a/oni/home/services/stumpwm/config
+++ b/oni/home/services/stumpwm/config
@@ -50,8 +50,13 @@ after it has been unlocked."
        ("C-M-Break" . "C-S-m"))))
 
 (setf *mode-line-background-color* "#5b6161"
-      *mode-line-foreground-color* "#bfbfbf"
-      *screen-mode-line-format* "[^B%n^b] %W^>%d")
+      *mode-line-foreground-color* "#bfbfbf")
+(setf *screen-mode-line-format*
+      (list " [^B%n^b] "
+            '(:eval
+              (or (ignore-errors (window-title (current-window)))
+               "Unknown"))
+            "^>%d "))
 (mode-line)
 
 (restore-from-file "default")
-- 
cgit v1.2.3-54-g00ecf