From 8122cd744943e89c791b5ac04de46798bdbda56d Mon Sep 17 00:00:00 2001
From: jasmine <its.jassy@pm.me>
Date: Mon, 1 Sep 2025 15:47:14 +0800
Subject: [PATCH] debug: testing title for java dev

---
 src/xmonad.hs | 6 ++++++
 1 file changed, 6 insertions(+)

diff --git a/src/xmonad.hs b/src/xmonad.hs
index 0aa2107..02bab6c 100644
--- a/src/xmonad.hs
+++ b/src/xmonad.hs
@@ -1,3 +1,4 @@
+import Data.List as L
 import Data.Map qualified as M
 import XMonad
 import XMonad.Actions.CycleWS
@@ -246,9 +247,14 @@ myXmobarPP = def
 -- ManageHook
 --
 
+(~?) :: Eq a => Query [a] -> [a] -> Query Bool
+q ~? x = fmap (x `L.isInfixOf`) q
+
 myManageHook = composeAll
     [ className =? "Thunar"     --> doFloat
     , className =? "Ristretto"  --> doFloat
     , className =? "Tk"         --> doFloat -- python gui development
     , className =? "TkFDialog"  --> doFloat -- ^^
+    --
+    , className =? "DEBUG"    --> doFloat
     ]