From c63d15b72bafe9584ec4a2ba1256347491cce69b Mon Sep 17 00:00:00 2001
From: Adrian Kummerlaender
Date: Tue, 21 Nov 2023 10:57:34 +0100
Subject: Hide Teams's prominent screensharing float

---
 gui/conf/xmonad.hs | 2 ++
 1 file changed, 2 insertions(+)

(limited to 'gui/conf/xmonad.hs')

diff --git a/gui/conf/xmonad.hs b/gui/conf/xmonad.hs
index d64cbd4..fa1b2d7 100644
--- a/gui/conf/xmonad.hs
+++ b/gui/conf/xmonad.hs
@@ -267,6 +267,7 @@ customEventHook = do
 
 customManageHook host = manageMonitor (hudMonitor host) <+> composeOne
   [ hasRole "GtkFileChooserDialog" -?> doRectFloat $ hideScreenBorder host dropDown
+  , isTeamsGarbage                 -?> doHideIgnore
   , isParaviewDialog               -?> doRectFloat $ hideScreenBorder host dropDown
   , isTelegramMediaViewer          -?> doFullFloat
   , isDialog                       -?> doCenterFloat
@@ -275,6 +276,7 @@ customManageHook host = manageMonitor (hudMonitor host) <+> composeOne
   , pure True -?> insertPosition Below Newer <+> namedScratchpadManageHook (scratchpads host) ]
   where
     hasRole x = stringProperty "WM_WINDOW_ROLE" =? x
+    isTeamsGarbage        = (title =? "teams.microsoft.com is sharing your screen.")
     isParaviewDialog      = (className =? "ParaView") <&&> isDialog
     isPrompter            = (className =? "Gcr-prompter")
     isTelegramMediaViewer = (className =? "TelegramDesktop") <&&> (title =? "Media viewer")
-- 
cgit v1.2.3