From 1c125cfd30e743f58ee9741609479aa102eb6ca0 Mon Sep 17 00:00:00 2001
From: jasmine <its.jassy@pm.me>
Date: Sun, 11 May 2025 23:33:22 +0800
Subject: [PATCH] fix logMode

---
 src/xmonad.hs | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/src/xmonad.hs b/src/xmonad.hs
index 9d6fcd1..c65674d 100644
--- a/src/xmonad.hs
+++ b/src/xmonad.hs
@@ -218,12 +218,13 @@ myXmobarPP :: PP
 myXmobarPP = def
     { ppSep             = grey0         " "
     , ppCurrent         = blue   . wrap " " ""
+    , ppTitle           = grey0  . wrap " " "" . shorten 50
     , ppVisible         = purple . wrap " " ""
     , ppHidden          = grey0  . wrap " " ""
     , ppHiddenNoWindows = grey0  . wrap " " ""
     , ppUrgent          = red    . wrap " " ""
     , ppLayout          = aqua   . wrap (grey0 " <fn=1>[</fn> ") (grey0 " <fn=1>]</fn> ")
-    , ppOrder           = \[ws, l, _, mode] -> [ws, l, mode]
+    , ppOrder           = \case { [ws, l, title, mode] -> [ws, l, mode, title]; xs -> xs }
     , ppExtras          = [logMode]
     }