From 274895058998ea6bef54322947dcc4445a5447f7 Mon Sep 17 00:00:00 2001
From: Afonso Franco <me@afonsofrancof.com>
Date: Tue, 22 Nov 2022 18:04:32 +0000
Subject: [PATCH] Xmonad added window swallowing

---
 .config/xmonad/xmonad.lhs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/.config/xmonad/xmonad.lhs b/.config/xmonad/xmonad.lhs
index 6091a7a..c63a6b3 100644
--- a/.config/xmonad/xmonad.lhs
+++ b/.config/xmonad/xmonad.lhs
@@ -32,7 +32,7 @@
  import System.Exit
  import XMonad.Util.SpawnOnce
  import XMonad.Layout.Spacing
- --import XMonad.Layout.Fullscreen
+ import XMonad.Hooks.WindowSwallowing
  import qualified XMonad.StackSet as W
  import qualified Data.Map        as M
 \end{code}
@@ -322,7 +322,7 @@ Percent of screen to increment by when resizing panes
       -- keys               = myKeys,
        layoutHook         = spacingWithEdge 10 $ myLayout,
        manageHook         = manageSpawn <+> myManageHook <+> manageHook def,
-       handleEventHook    = myEventHook <+> fullscreenEventHook,
+       handleEventHook    = myEventHook <+> fullscreenEventHook <+> swallowEventHook (className=?"Alacritty") (return True) ,
        startupHook        = myStartupHook}
 \end{code}